单选题在表单中，“Caption”是对象的( )
单选题要建立一个随机文件记录学生的信息，如下定义的学生记录类型，由学号、姓名和5门课程成绩(百分制)组成，下列的定义正确的是( )。
单选题在窗体上画一个名为Command1的命令按钮，编写如下程序：
Private Sub Command1_Click()
Dim M(10) As Integer
For k=1 To 10
M(k)=12-k
Next k
x=6
Print M(2+M(x))
End Sub
程序运行后，单击命令按钮，输出的结果是______。
单选题下列关于菜单的说法错误的是( ) A．每个菜单项都是一个控件，与其他控件一样也有其属性和事件 B．除了Click事件之外，菜单项不可以响应其他事件 C．菜单项的索引号可以不连续 D．菜单项的索引号必须从1开始
单选题标准模块中有如下程序代码：
Public x As Integer，y As Integer
Sub var pub()
x=10：y=20
End Sub
在窗体上有1个命令按钮，并有如事件过程：
Private Sub Command1 Click()
Dim x As Integer
Call var pub
x=x+100
y=y+100
Print x；y
End Sub
运行程序后单击命令按钮，窗体上显示的是( )。
单选题以下关于变量的类型说明符的使用中，正确的是______。 A．Dim a:a%=8000 B．Dim a:a@=1000% C．Dim a:a="OK" D．Dim a:a&=True
单选题有如下程序：
Private Sub Form Click()
Dim i As Integer，sum As Integer
sum=0
For i=2 To 10
Ifi Mod 2<>0 And i Mod 3=0 Then
sum=sum+i
EndIf
Next i
Print sum
End Sub
程序运行后，单击窗体，输出结果为( )。
单选题计算下面分段函数的正确语句是______。A.y=IIf(x＞0,x+1,IIf(x＜0,x-1,0)B.y=IIf(x=0,0,IIf(x＞0,x-1,x+1))C.y=IIf(x＞0,x+1,IIf(x＜0,0,x-1)D.y=IIf(x=0,0,x-1,x+1)
单选题在Visual Basic中，组合框是文本框和下列哪一项的特性的组合？( ) A) 复选框 B) 标签 C) 列表框 D) 目录列表框
单选题通用对话框CommonDialog中的方法为
单选题设有下列程序
Private Sub Form Click()
X=50
For i=1 T0 4
y=InputBox("请输入一个整数")
y=Val(v)
If y Mod 5=0 Then
a=a+y
x=y
Else
a=a+x
End If
Next i
Print a
End Sub
程序运行后，单击窗体，在输入对话框中依次输入15、24、35、46，输出结果为( )。
单选题设窗体上有一个名称为List1的列表框和一个名称为Check1的复选框数组(下标从0开始)。程序运行时，单击某个复选框，如果列表框中没有该复选框的标题，则把该复选框的标题添加到列表框中，否则从列表框中把该复选框标题删除。 Pfivate Sub Check1_Click(Index As Integer) For k=0 To List1．ListCount-1 If Check1(Index)．Caption=List1．List(k)Then Exit For Next k Ifk
单选题执行语句Open"C:/stu.dat"For Input As #2之后，系统 ( )
单选题单击一次命令按钮之后，在对话框中输入12，21，30，3，窗体中的输出结果为______ 。 Private Sub Command1_ Click() For i = 1 To 4 s = InputBox (“请输入”) Call per(i, s) Next i Print s End Sub Sub per(a, ByVal b) b = 1 For i = 1 To 3 a = a * i Next i End Sub
单选题如果要在语句：a=Array(1，2，3，4，5)的前面声明变量a，则正确的声明是
单选题有下面程序代码：
Private Sub Command1_Click( )
Dim a, s As Integer
a = Array(1, 2, 3, 4, 5, 6, 7, 8, 9)
k = 1
s = 0
Do
s = s + a(k)
k = k + 2
Loop Until k ＞ UBound(A)
Print s
End Sub
程序运行产生的输出是______。
单选题下列程序运行时输出的结果是 Option Base 1 Private Sub Form_Click() Dim x(10) As Integer，y(5) As Integer For i=1 to 10 x(i) =10-i+1 Next For i=1 to 5 y(i)=x(2*i-1)+x(2*i) Next For i=1 to 5 Print y(i) Next End Sub
单选题下面哪个属性不是框架控件的属性( )。
单选题下面程序运行结果是( )。 Private Sub Form_Click() Dim x As Single,y As Single x=InputBox("请输入数据25"):y=InputBox("请输入数据10") Print x+y;InputBox("请输入数据25")+InputBox("请输入数据10") End Sub
单选题有如下事件过程： Private Sub Form_KeyDown(KeyCode As
Integer, Shift As Integer) If (Button And
1)=1 Then Print "你好棒啊!" End
If End Sub
程序运行后，为了在窗体上输出“你好棒啊!”，应当按下的鼠标键是__________。
A.左键
B.右键
C.同时按下左键和右键
D.按什么都不显示