单选题下面程序计算并输出的是( ) Private Sub Command1_Click() a=10 s=0 Do s=s+a*a*a a=a-1 Loop Until a＜=0 Print s End Sub A．13+23+33+…+103的值 B．10! +…+3! +2! +1!的值 C．(1+2+3+…+1O)3的值 D．10个103的和
单选题在窗体上画一个名称为CommonDialogl的通用对话框，一个名称为Commandl的命令按钮。然后编写如下事件过程： Private Commandl_Click() CommonDialogl.FileName="" CommonDialogl.Filter="Allfile|*.*|(*.Doc)|*.Doc|(*.Txt)|*.Txt" CommonDialogl.Filterlndex=2 CommonDialogl.DialogTifle="VBTest" CommonDialogl.Action=1 EndSub 对于这个程序，以下叙述中错误的是( )。 A．该对话框被设置为“打开”对话框 B．在该对话框中指定的默认文件名为空 C．该对话框的标题为VBTest D．在该对话框中指定的默认文件类型为文本文件(*.Txt)
单选题设有如下数组声明： Dim a()As Single 下面关于这一声明的叙述中正确的是( )。
单选题英文缩写“OOP'’的含义是( )。
单选题在窗体上画一个命令按钮，名称为Command1，然后编写如下代码： Option Base 0 Private Sub Command1_Click() Dim A1 (4) As Integer, A2 (4) As Integer For k = 0 To 2 A1 (k+1) = InputBox("请输入一个整数") A2 (3-k) = A1(k+1) Next k Print A2(k) End Sub 程序运行后，单击命令按钮，在输入对话框中依次输入2、4、6，则输出结果为( )。 A) 0 B) 1 C) 2 D) 3
单选题以下能正确定义数据类型Systemlnfo的代码是( )。
单选题Load事件是在窗体被载入工作区时______触发的事件。
单选题下列叙述中正确的是
单选题以下关于过程及过程参数的描述中，错误的是______。 A) 窗体或者控件均可以作为过程的参数 B) 调用过程时可以用控件名称作为实际参数 C) 用数组作为过程的参数时，使用的是传值方式 D) 并不是只有函数过程能够将过程中处理的信息传回到调用的程序中
单选题在窗体上画一个命令按钮和一个文本框，名称分别为Command1和Text1，然后编写如下程序： Private Sub Command1_Click() a=InputBox("请输入日期(1～31)") t="旅游景点：" &IIf(a＞0 And a＜=10，"长城"，"") & _ IIf(a＞10 And a＜=20，"故宫"，"") & IIf(a＞20 And a＜=31，"颐和园"，"") Text1.Text=t End Sub 程序运行后，如果从键盘上输入16，则在文本框中显示的内容是 A) 旅游景点：长城故宫 B) 旅游景点：长城颐和园 C) 旅游景点：颐和园 D) 旅游景点：故宫
单选题执行语句Dim X，Y As Integer后，
单选题Load事件是在窗体被装入工作区时______触发的事件。
单选题要使窗体从屏幕上消失但仍在内存中，应使用的方法或语句为______。
单选题编写如下程序：
Private Sub Command1_Click()
Dim score As Integer
score=86
If score＞85
Then r=1
ElseIf score＞60 Then
r=2
Else
r=0
End If
Print r
End Sub
程序运行后，单击命令按钮Command1，输出结果为
单选题运行如下程序Private Sub Command1_Click() Dim a(5， 5)As Integer For i＝1 To 5 For j＝1 To 4 a(i， j)＝i * 2＋j If a(i， j)/ 7＝a(i， j)/7 Then n＝n＋1 End If Next j Next Print nEnd Subn的值是( )。
单选题有如下自定义过程： Sub test(x As Integer) x =X *2+1 If x＜6 Then Call test(x) End If x=x* 2 + 1 Print x； End Sub调用该过程的事件过程如下：Private Sub Command1_Click() test 2End Sub则该段程序的执行结果是______ 。
单选题设工程文件包含两个窗体文件Form1.frm、Form2.frm及一个标准模块文件Module1.bas，两个窗体上分别只有一个名称为Command1的命令按钮。 Form1的代码如下： Public x As Integer Private Sub Form_Load() x=6 y=8 End Sub Private Sub Command1_Click() Form2.Show End Sub Form2的代码如下： Private Sub Command1_Click() Print Form1.x，y End Sub Module1的代码如下： Public y As Integer 运行以上程序，单击Form1的命令按钮Command1，则显示Form2；再单击Form2上的命令按钮Command1，则窗体上显示的是______。 A) 6 0 B) 0 8 C) 6 8 D) 程序有错
单选题有如下程序：
Option Base 1
Private Sub Command1_Click()
Dim arr(10)
arr=Array(10,35,28,90,54,68,72,90)
For Each a In arr
If a＞50 Then
Sum=Sum+a
End If
Next a
End Sub
运行上述程序时出现错误，错误之处是______。
单选题下列语句的输出结果为{{U}} {{/U}}。
PrintFormat$(5689.36，"000,000.000")
A.5,689.36
B.5,689.360
C.5,689.3
D.005,689.360
单选题以下关于窗体的描述正确的是