单选题单击命令按钮时，下列程序的运行结果为
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
单选题有如下的程序： Private Sub Command1_Click() Dim k As Integer,m As Integer Dim P As Integer k=4:m=1 P=Fun(k，m)：Print P： P=Fun(k，m)：Print P End Sub Private Function Fun(a As Integer,b As Integer) Static m As Integer,i As Integer m=5:i=2 i=i+m+1 m=i+a+b Fun=m/2 End Function 单击命令按钮后，输出结果为( )。 A) 2 2 B) 4 4 C) 5 5 D) 6 6
单选题设窗体上有一个名称为Check1的复选框，并有下面程序代码：Private Sub Check1_MouseDown(Button As Integer，Shift As Integer，X As Single，Y As Single)Check1．Value=1End Sub根据上面的事件过程，可以得出结论
单选题下列循环中，可以正常结束的是
单选题下列程序代码实现生成20个0～100之间的随机整数，存于数组中，打印数组中大于50的数，并求这些数的和。请选择正确的程序段是( )，完成程序。 Private Sub Commandl_Click() Dim arr(1 To 20) For i=1 To 20 arr(i)=______ Textl.Text=Textl.Text & arr(i)& Chr(13)& Chr(10) Next i Sum=0 For Each X ______ If X＞50 Then Print Tab(20)；X Sum=Sum+X End If Next X Print Tab(20)；"Sum="；Sum End Sub
单选题在变量的隐式说明中，下列( )是单精度型变量。
单选题以下Visual Basic不支持的循环结构是
单选题设在窗体上有一个名称为Check1的复选框数组，并有以下事件过程：Private Sub Check1_Click(Index As
Integer) …End Sub则下面叙述中错误的是______。
A.单击数组中任何复选框都会调用此事件过程
B.参数Index的值等于单击数组中某个复选框的Index属性的值
C.上面的过程是数组中第1个复选框的事件过程
D.从过程的首部(即第1行)无法确定数组中复选框的个数
单选题默认情况下，下面声明的数组的元素个数是( )。 Dim a(5，-2 To 2)
单选题为了实现鼠标自动拖放，必须把( )属性设置为1；而为了执行手动拖放，必须把该属性设置为0。
单选题在程序运行期间可以将图形载入窗体、图片框或图像框的函数是
单选题下列程序 Private Sub Command1_Click( ) x = "abcd" y = "1234" For i = 1 To 4 z = z + Mid(x, i, 1)+ Left(y, 1) Next i Print z End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是________。
单选题文本框Text1的KeyDown事件过程如下： Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer) End Sub 其中参数KeyCode的值表示的是发生此事件时______。 A) 是否按下了Alt键或Ctrl键 B) 按下的是哪个数字键 C) 所按的键盘键的键码 D) 按下的是哪个鼠标键
单选题下面的语句用Array函数为数组变量a的各元素赋整数值：
a=Array(1,2,3,4,5,6,7,8,9)。
针对a的声明语句应该是______。
单选题一个工程中含有窗体Form1、Form2和标准模块Model1，如果在Form1中有语句Pubilc X As
Integer，在Model1中有语句Pubilc Y As Integer，则以下叙述中正确的是（ ）
单选题设有以下循环结构 Do 循环体 Loop While〈条件〉 则以下叙述中错误的是( )。
单选题设有以下函数过程 Private Function Fun(a()As Integer, b As String)As Integer End Function 若已有变量声明： Dim x(5)as Integer, n As Integer, ch As String 则下面正确的过程调用语句是( )。
单选题工程中有两个窗体，名称分别为Form1、Form2，Fonn1为启动窗体，该窗体上有命令按钮 Command1。要求程序运行后单击该命令按钮时显示Form2，则按钮Click事件过程应该是 ______。
单选题在窗体上画两个单选按钮，名称分别为Option1、Option2，标题分别为“宋体”和“黑体”；1个复选框(名称为Check1，标题为“粗体”)和1个文本框(名称为Text1，Text属性为“改变文字字体”)，窗体外观如图所示。程序运行后，要求“宋体”单选按钮和“粗体”复选框被选中，则以下能够实现上述操作的语句序列是()。A)Option1.Value=FalseCheek1.Value=TrueB)Option1.Value=TrueCheck1.Value=0C)Option2.Value=FalseCheck1.Value=2D)Option1.Value=TrueCheck1.Value=1
单选题在窗件上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_ Click() Move 500, 500End Sub程序运行后，单击命令按钮，执行的操作为______。