单选题在设计阶段，如果双击窗体上的一个文本框控件，则在代码窗口中显示该控件的事件过程所对应的事件是
单选题设有如下一段程序：
Private Sub Command1_Click()
Static a As Variant
a=Array(one,two,three,four,five)
Print a(3)
End Sub
针对上述事件过程，以下叙述中正确的是______。
单选题有如下程序： Function F(a As Integer) b = 0 Static C b = b + 1 c = c + 2 F = a + b + c End Function Private Sub Command1_Click() Dim a As Integer a = 2 For i=1 To 3 Print F(a)； Next i End Sub 运行上面的程序，单击两次命令按钮，在窗体上输出结果为 A) 4 4 4 B) 4 5 6 C) 5 7 9 D) 11 13 15
单选题有如下程序： Private Sub Command1_Click() Dim a As Single Dim b As Single a=5:b=4 Call Sub1(a,b) End Sub Sub Sub1(x As Single，y As Single) t=X X=t/Y Y=t Mod y End Sub 在调用运行上述程序后，a和b的值分别为
单选题下面不能在信息框中输出“VB”的是______，
A.MsgBox"VB"
B.x=MsgBox("VB")
C.MsgBox("VB")
D.CallMsgBox"VB"
单选题对于含有多个窗体的工程而言，以下叙述中正确的是
单选题设窗体上有一个名称为List1的列表框和一个名称为Check1的复选框数组(下标从0开始)。程序运行时，单击某个复选框，如果列表框中没有该复选框的标题，则把该复选框的标题添加到列表框中，否则从列表框中把该复选框标题删除。If Check1(Index)．Caption=List1．List(k)Then Exit For为使上面程序可以实现该功能，程序代码中横线上应该填入的代码是
单选题已知数组Dim a(1 To 10)As Integer，则下面正确调用GetValue函数的是
____
。
Private Function GetValue(a()As Integer)As Integer
For i=1 To 10
GetValue=GetValue+a(i)
Next i
End Function
单选题关于控件数组，下列描述中不正确的是( )。
单选题以下程序执行后，在窗体上输出的图案是( )。 Form1．Cls For a=1 To 5 Print Space(5-a)；String(a，"*") Next a
单选题在面向对象方法中，不属于“对象”基本特点的是( )。
单选题下列可以作为Visual Basic变量名的是______。
单选题设窗体文件中有下面的事件过程：
Private Sub Command1_Click()
Dim s
a%=100
Print a
End Sub
其中变量a和s的数据类型分别是______。
单选题某人编写了如下程序，用来求10个整数(整数从键盘输入)中的最大值： Private Sub Command1_Click() Dim a(10) As Integer，max As Integer For k=1 To 10 a(K)=InputBox("输入一个整数") Next k Max=0 For k=1 To 10 If a(k)＞max Then Max＝a(k) End If Next k Print max End Sub 运行程序时发现，当输入10个正数时，可以得到正确结果，但输入10个负数时结果是错误的，程序需要修改，下面的修改中可以得到正确运行结果的是( ) A．把If a(k)＞max Then改为If a(k)＜max Then B．把max＝a(k)改为a(k)＝max C．把第2个循环语句For k＝1 TO 10改为For k=2 TO 10 D．把max=0改为max=a(10)
单选题为了清除窗体上的一个控件，下列正确的操作是
单选题窗体上有一个名为Command1的命令按钮，并有下面的程序：
Private Sub Command1_Click()
Dim art(5)As Integer
For k=1 To 5
arr(k)=k
Next k
prog arr()
For k=1 To 5
Print arr(k);
Next k
End Sub
Sub prog(a()As Integer)
n=UBound(a)
For i=n To 2 step-1
For j=1 To n-1
if a(j)＜a(j+1) Then
t=a(j):a(j)=a(j+1);a(j+1)=t
End If
Next j
Next i
End Sub
程序运行时，单击命令按钮后显示的是______。
单选题已知通用对话框名为Cdlg，则执行下列的______语句，将弹出“字体”对话框。
单选题为了使模块尽可能独立，要求( )。
单选题下列的（ ）对象支持KeyPress事件
单选题在三级模式之间引入两层映像，其主要功能之一是( )。