单选题下列控件中，没有Caption属性的是______。
A.单选按钮
B.复选框
C.列表框
D.框架
单选题窗体上有1个名称为Command1的命令按钮，事件过程及函数过程如下：
Private Sub Command1_Click()
Dim p As Integer
p=m(1)+m(2)+m(3)
Print p
End Sub
Private Function m(n As Integer)As Integer
Static s As Integer
For i=1 To n
s=s+1
Next
m=s
End Function
运行程序，第2次单击命令按钮Command1时的输出结果为______。
单选题下面可以产生20～30(含20和30)的随机整数的表达式是
单选题资源文件的扩展名是（ ）。
单选题以下不能触发滚动条Change事件的操作是______。
A.拖动滚动框
B.单击两端的滚动箭头
C.单击滚动框
D.单击滚动箭头与滚动框之间的滚动条
单选题在窗体上画一个名称为CD1的通用对话框，并有如下程序： Private Sub Form_Load() CD1. DefaultExt="doc" CD1. FileName="c:/file1.txt" CD1.Filter="应用程序(*.exe)|*.exe" End Sub 程序运行时，如果显示了“打开”对话框，在“文件类型”下拉列表中的默认文件类型是( )。
单选题在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click( )
x = -5
If x ＞0 Then
y = x ^ 2
Else
y = x
End If
Print y
End Sub
程序运行后，单击命令按钮，窗体上显示的是（ ）
单选题当窗体大小改变时，要使其中的控件也按比例发生变化，应使用窗体的是______
单选题设有如下事件过程：
Private Sub Command1_Click() Dim a
a=Array(3，5，6，3，2，6，5，3，5，4，3，9，4，5，6，3，5)
x=0 n=UBound(a)
For i=0 To n
m=0
For j=0 To n
If a(i)=a(j) Then
m=m+1
End If
Next j
If m＞x Then
x=m:b=a(i)
End If
Next i
Print b
End Sub
运行程序，输出是
单选题编写如下程序代码： Private Sub Command1_Click() Call sub pro End Sub Sub sub pro() Static sum As Integer Dim i As Integer For i=l To 10 Step 2 sum=sum+i Next Print sum End Sub 程序运行后，第三次单击命令按钮Command1时，输出结果为( )。
单选题执行以下程序段后，变量c$的值为______。
a$="Visual Basic Programming"
b$="Quick"
C$=b$&UCase(Mid$(a$,7,6))&
Right$(a$,12)
单选题执行如下语句：
a=InputBox("Today","Tomorrow","Yesterday”,,,"Day before yesterday",5)
将显示一个对话框，在对话框的输入区中显示的信息是______。
单选题表示条件“X+Y大于10 小于100，且X-Y要小于0”的逻辑表达式为( )。
单选题设有变量声明为“Dim aDateAs Date”，则能为变量aDate正确赋值的表达方式是( )。
单选题在窗体上画一个名称为Commandl的命令按钮，然后编写如下程序：PrivateSubCommandl_Click()DimiAsInteger,jAsIntegerDima(10,10)AsIntegerFori=1To3Forj=1To3a(i，j)=(i-1)*3+jPrinta(i，j)；NextjPrintNextiEndSub程序运行后，单击命令按钮，窗体上显示的是()。
单选题窗体上有一个名称为Command1的命令按钮，其中部分代码如下：
Private Sub Command1_Click()
Dim a(10) As Integer
Dim n As Integer
Call calc(a,n)
...
End Sub
cale过程的首行应该是______。
单选题窗体上有一个名称为Text1的文本框，一个名称为Command1的命令按钮。以下程序的功能是从顺序文件中读取数据：Private
Sub Command1_Click() Dim s1 As String, s2 As String Open "c:/d4.dat"
For Append As #3 Line Input #3, s1 Line Input #3,
s2 Text1.Text=s1+s2 Close End Sub该程序运行时有错误，应该进行的修改是______。
A.将Open语句中的For Append改为For Input
B.将Line Input改为Line
C.将两条Line Input语句合并为Line Input #3, s1, s2
D.将Close语句改为Close #3
单选题如果要使一个菜单(假设菜单名为mnuM)在运行时不可见，应使用的语句是______。
单选题下列说法中正确的是( )。
单选题有下面程序代码：
Private Sub Command1_Click( )
Dim a%(10)
For k = 1 To 9
a(k) = InputBox(" ")
Next. k
Call proc(a( ), 6, 3, 10)
For k = 1 To 10
Print a(k); " ";
Next k
End Sub
Private Sub proc(a%( ), x%, m%, n%)
For k = n To m + 1 Step -1
a(k) = a(k - 1)
Next k
a(k) = x
End Sub
Command1_Click过程运行时，从键盘输入9个数：12 32 65 34 87 56 79 50 52，则输出是______。