单选题支持子程序调用的数据结构是( )。
单选题用下面的语句所定义的数组的元素个数是 Dim arr(3 To 6. -2 to 2)
单选题要把一个命令按钮设置成无效，应设置属性 ______ 的值为False。 A) Visible B) Enabled C) Default D) Cancel
单选题在窗体上画一个命令按钮，然后编写如下代码： Private Type Record ID As Integer Name As String*20 End Type Private Sub Command1_Click() Dim MaxSize.NextChar，MyChar Open"D:/temp/female.txt"For Input As #1 MaxSize=LOF(1) For NextChar=1 To MaxSize Seek#1，NextChar MyChar=Input(1，#1) Next NextChar Print EOF(1) Close #1 End Sub 程序运行后，单击命令按钮，其输出结果为 ______。
单选题以下关于变量作用域的叙述中错误的是( )。 A) 在窗体模块的声明部分声明的Private变量，其作用域是窗体内的所有过程 B) 在标准模块的声明部分声明的Private变量，其作用域是模块内的所有过程 C) 在窗体模块的声明部分声明的Pubilc变量，其作用域是本窗体的所有过程 D) 在标准模块的声明部分声明的Pubilc变量，其作用域是应用程序的所有过程
单选题以下程序段的输出结果为 ______。 X=1 Y=4 Do Until Y＞4 X=X*Y Y=Y+1 Loop Print X
单选题有如下程序： Private Sub Form_CHck() Dim i As Integer，sum As Integer sum=0 For i=2 TO 10 If Mod 2 ＜＞And i Mod 3=0 Then sum=sum+i End If Next i Print sum End Sub 程序运行后，单击窗体，输出结果为______。
单选题为计算1+2+2
2
+2
3
+2
4
+…+2
10
的值，并把结果显示在文本框TeXtl中，若编写如下事件过程：
Private Sub Command1_Click()
Dima％，b％，i％
s=1：a=2
For i=2To10
a=a*2：b=b+a
Next i
Text1．Text=b
End Sub
执行此事件过程后发现结果是错误的，为能够得到正确结果，应做的修改是( )。
单选题在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，然后编写如下程序：
Private Sub Command1_Click()
Dim x,y,z As Integer
x=5
y=7
z=0
Text1.Text=""
Call P1(x,y,z)
Text1.Text=Str(z)
End Sub
Sub P1(ByVal a As Integer, ByVal b As Integer, c As Integer)
c=a+b
End Sub
程序运行后，如果单击命令按钮，则在文本框中显示的内容是______。
单选题设有下列程序：
Private Sub Form_Click()
x=50
For i=1 To 4
y=InputBox("请输入一个整数")
y=Val(y)
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，输出结果为______。
单选题判断复选框是否被选中的属性为
单选题下列程序段的执行结果为 a=95 If a＞60 Then I=1 If a＞70 Then I=2 If a＞80 Then I=3 If a＞90 Then I=4 Print"I=";I
单选题在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
Dim I，Num
Randomize
Do
ForI=1 To 1000
Num=Int(Rnd*100)
Print Num；
SelectCase Num
Case 12
Exit For
Case 58
Exit Do
Case 65，68，92
End
End Select
Next I
Loop
End Sub
上述事件过程执行后，下列描述中正确的是
单选题下列对于软件测试的描述正确的是______。 A) 软件测试的主要目的是发现程序中的错误 B) 软件测试的目的是证明程序是否正确 C) 软件测试的目的是使程序运行结果正确 D) 软件测试是证明软件中没有错误
单选题Print方法可以在对象上输出数据，这些对象包括（ ）。
单选题有如下的一个函数过程： Function fn(ByVal num As Long) Dim k As Long k=1：num=Abs(num) Do While num k=k*(num Mod 10) num=num＼10 Loop fn=k End Function 通过以下事件过程调用该函数，程序运行后，在输入对话框中输入数字“123”，则运行结果为( )。 Private Sub Command1_Click() Dim n As Long Dim r As Long n=InputBox("请输入一个数值") n=CLng(n)：r=fn(n) Print r End Sub
单选题下列程序的执行结果是( )。 Privaae Sub Form_Activate Dim score(3)As Integer,total As Integer Dim aa_score As Variant score(1)=50:score(2)=14:score(3)=36 total=0:i=0 For Each aa_score In score i=i+1 total=total+aa_score Print i,aa_score,total Next End Sub
单选题下述程序段中，与其他3个程序段作用不同的是_______。
A.s=0 i=0 While i＞100
s=s+1 Wend
B.s=0 i=0 While i＜100
i=i+1 Wend
C.s=0 i=1 Do While i＜100
s=s+1 i=i+1
Loop
D.s=0 i=0 Do Until i＞=100
s=s+1 i=i+1
Loop
单选题下列程序段的执行结果为( )。x=Int(Rnd+4)Select Case xCase5：Print"A Class"Case4：Print"B Class"Case3：Print"C Class"CaseElse：Print"D Class"End Select
单选题下列是一个循环结构的程序，循环体内的语句将执行的次数是( )。 k=0 For i=1 to 100 For i=1 to 10 k=k+1 Next Next A) 0 B) 10 C) 100 D) 1000