单选题以下关于过程及过程参数的描述中，错误的是______。 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
单选题以下关于窗体的描述正确的是
单选题通用对话框Filter属性的作用是
单选题窗体上有1个名称为Text1、内容为空的文本框。编写如下事件过程： Private Sub Text1_KeyUp(KeyCode As Integer, Shift As Integer) Print Text1. Text; End Sub 运行程序，并在文本框中输入“123”，则在窗体上的输出结果为( )。 A) 123 B) 112 C) 12123 D) 112123
单选题有如下程序： Dim arr (3,3)
For j=1 To 3 For k=1 To 3
arr(j,k)=(j-1)*3+k Next
k Next j For j=2 To 3
For k=2 To 3
Print arr(k,j); Next k
Print Next j
运行程序后，输出的结果是______________。
A.25 36
B.58 69
C.47 58
D.59 68
单选题有如下程序：
Private Sub Command1_Click()
Dim i As Integer,j As Integer
Dim sum As Integer
n=1
Do
j=1
Do
sum=sum+j
j=j+1
Print j;
Loop Until j＞3
n=n+2
Loop Until n＞10
Print sum
End Sub
运行上述程序，外层Do循环执行的次数为______。
单选题下面的程序运行时，若输入395，则输出结果是 Private Sub Command1_Click() Dim x% x=InputBox("请输入一个3位整数") Print x Mod 10, x/100, (x Mod 100)/10 End Sub
单选题在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() For n=1 To 20 If n Mod 3＜＞Then m=m+n/3 Next n Print n 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(
单选题以下程序段的输出结果为
x=1
y=4
Do Until y＞4
x=x*y
y=y+1
Loop
Print x