Question

求VB答案

65.在窗体上画一个名称为Commandl的命令按钮，然后编写如下程序
　 Private Sub Command1_Click()
　　 Static X As Integer
　　 Static Y As Integer
　 　 Cls
　　 Y=1
　　 Y=Y+5
　　 X=5+X
　　 Print X,Y
　　End Sub
　　程序运行时，三次单击命令按钮Commandl后，窗体上显示的结果为()。
A.15 16 B.15 6 C.15 15 D.5 6
66.在窗体上画一个名称为Timer1的计时器控件，要求每隔0.5秒发生一次计时器事件，则以下正确的属性设置语句是( )。
A.Timer1.InterVal=0.5 B.Timer1.Interval=5
C.Timer.Interval=50 D.Timer1.Interval=500
67.设在菜单编辑器中定义了一个菜单项，名为menu1。为了在运行时隐藏该菜单项，应使用的语句是( )。
A.menu1.Enabled=True B.Munu1.Enabled=False
C.Menu1.Visible=True D.Menu1.Visible=False
68.假定有如下事件过程：
Private Sub Form_Click()
Dim x As Integer, n As Integer
x = 1
n = 0
Do While x < 28
x = x * 3
n = n + 1
Loop
Print x, n
End Sub
程序运行后，单击窗体，输出结果是( )。
A.81 4 B.56 3 C.28 1 D.243 5
69.设有如下程序段：
x=2
For i=1 To 10 Step 2
x=x+i
Next
运行以上程序后，x的值是( )。
A.26 B.27 C.38 D.57
70.确定一个控件在窗体上的位置的属性是( )。
A.Width和Height B.Width或Height C.Top和Left D.Top或Left
71.设窗体上有一个列表框控件List1，且其中含有若干列表项。则以下能表示当前被选中的列表项内容的是( )。
A.List1.List B.List1.ListIndex C.List1.Index D.List1. Text
72.在窗体上画一个名称为List1的列表框，为了对列表框中的每个项目都能进行处理，应使用的循环语句为 ( )。
A.For i=0 To List1.ListCount-1
……
Next
B.For i=0 To ListCount-1
……
Next
C. For i=1 To List1.listCount
……
Next
D.For i=1 To ListCount
……
Next
73.在窗体上画一个文本框和一个计时器控件，名称分别为Text1和Timer1,在属性窗口中把计时器的Interval属性设置为1000，Enabled属性设置为False,程序运行后，如果单击命令按钮，则每隔一秒钟在文本框中显示一次当前的时间。以下是实现上述操作的程序：
Private Sub Command1_Click()
Timer1._________
End Sub
Private Sub Timer1_Timer()
Text1.Text = Time
End Sub
在______处应填入的内容是( )。
A.Enabled=True B.Enabled=False C.Visible=True D. Visible=False
74．在Visual Basic代码中，将多个语句合并在一行上的并行符是( ) 。
A. 撇号（’） B. 冒号（:） C. 感叹号（！） D. 问号（?）
75．在设计菜单时,如果要在菜单中加入一个菜单分隔项,则菜单分隔项的标题必须设置为( )。
A.加号(+) B.减号(-) C.星号(*) D.感叹号(!)

Answer 1

65、B
66、D
67、D
68、A
69、B
70、C
71、D
72、A
73、A
74、B
75、B

应该没有错误。

Answer 2

65、B
66、D
67、d
68、A
69、B
70、C
71、d
72、A
73、A
74、b
75、B

Answer 3

B D D A B C D A A B B