单选题单击命令按钮时，下列程序的运行结果为______。
Private Sub Command1_Click()
Print Fun(23,18)
End Sub
Public Function Fun(m As Integer，n As Integer)As Integer
Do While m＜＞n
Do While m＞n:m=m-n:Loop
Do While m＜n:n=n-m:Loop
Loop
Fun=m
End Function
单选题如果一个变量未经定义就直接使用，则该变量的类型为
单选题以下叙述中错误的是______。
A.在通用过程中，多个形式参数之间可以用逗号作为分隔符
B.在Print方法中，多个输出项之间可以用逗号作为分隔符
C.在Dim语句中，所定义的多个变量可以用逗号作为分隔符
D.当一行中有多个语句时，可以用逗号作为分隔符
单选题当运行程序时，系统会自动执行启动窗体的某个事件过程，该事件过程是 ______ 。
单选题下列程序段执行后，输出的结果是( )。 For k1=0 To 4 y=20 For k2=0 To 3 y=10 For k3=0 To 2 y=y+10 Next k3 Next k2 Next k1 Print y
单选题设有以下函数过程 Private Function Fun(a() As Integer，b As String)As Integer End Function 若已有变量声明： Dim x(5)As Integer，n As Integer，ch As String 则下面正确的过程调用语句是
单选题下列关于数据类型的叙述中，错误的一条是______ 。
单选题在窗体上画一个命令按钮，名称为Commandl，然后编写如下事件过程： Option Base 0 Private Sub Command1_Click() Dim city As Variant city=Array("北京"，"上海"，"天津"，"重庆") Print city(1) End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是______。
单选题以下对文件分类的划分不正确的是( )。
单选题下列程序段的执行结果为 Dim A(10，10) For 1=2 To 4 For J=4 To 5 A(I，J)=I*J Next J Next I Print A(2，5)+A(3，4)+A(4，5)
单选题以下关于控件数组的叙述中，正确的是______。
单选题当文本框的Text属性发生变化时，将发生 ______ 事件。
单选题下列关于栈的叙述正确的是{{U}} {{/U}}
A.栈按“先进先出”组织数据
B.栈按“先进后出”组织数据
C.只能在栈底插入数据
D.不能删除数据
单选题窗体上有一个名称为Command1的命令按钮，事件过程如下：
Private Sub Command1_Click()
Dim num As Integer，x As Integer
num=Val(InputBox("请输入一个正整数"))
Select Case num
Case Is＞100
x=x+num
Case Is＜90
x=num
Case Else
x=x*num
End Select
Print x：
End Sub
运行程序，并在三次单击命令按钮时，分别输入正整数100、90和60，则窗体上显示的内容为______。
单选题下列关于图片框的语句中错误的是( )。
单选题假定通过复制、粘贴操作建立了一个命令按钮数组Commandl，以下说法中错误的是
单选题用Line Input语句从顺序文件读出数据时，每次读出一行数据。所谓一行是指遇到______分隔符，即认为一行的结束。
单选题在窗体上没有进行任何属性设置，然后编写如下事件过程，则程序运行结果是{{U}} {{/U}}。
Private Sub Form_Load() For i=1 To 10
sum=sum+i Next i Print "Sum=";sum
End Sub
A. 在窗体上输出55
B. 在窗体上输出sum=55
C. 出错
D. 窗体上不输出
单选题假定有以下两个过程： Sub S1(ByVal x As Integer, ByVal y As Integer) Dim t As Integer t=K x=y y=t End Sub Sub S2(x As Integer, y As Integer) Dim t As Integer t=K x=y y=t End Sub 则以下说法中正确的是 ( )
单选题在窗体上画一个命令按钮，然后编写如下事件过程。 Private Sub Command1_Click( ) Dim m As Integer, n As Integer, p As Integer m=3: n=5:p=0 Call Y(m, n, p) Print Str(p) End Sub Sub Y(ByVal i As Integer, ByVal j As Integer, k As Integer) k=i+j End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是