在窗体上画一个名称为Commandl的命令按钮,然后编写如下事件过程:程序运行后,单击窗体,则窗体上显示的内容是（）

在窗体上画一个名称为Commandl的命令按钮，然后编写如下通用过程和命令按钮的事件过程： Private Function fun(By Val m As Integer) If m Mod 2=0 Then fun=2 Else fun=1 End If End Function Private Sub Commandl_Click() Dim i As Integer,s As Integer s=0 For i=1 To 5 s=s+fun(i) Next Print s End Sub 程序运行后，单击命令按钮，在窗体上显示的是______。

A． 6

B．7

C．8

D．9

在窗体上画一个命令按钮，名称为Commandl，然后编写如下事件过程：程序运行后，如果单击命令按钮，则在窗体上显示的内容是（ ）。

A. 机床

B. 车床

C. 钻床

D. 轴承

在窗体上画一个名称为Commandl的命令按钮，然后编写如下事件过程： Private Sub Command1 Click() Move 500，500 End Sub 程序运行后，单击命令按钮，执行的操作为

A．命令按钮移动到距窗体左边界、上边界各500的位置

B．窗体移动到距屏幕左边界、上边界各500的位置

C．命令按钮向左、上方向各移动500

D．窗体向左、上方向各移动500

在窗体上画一个名称为Commandl的命令按钮，然后编写如下事件过程： Private Sub Commandl Click() Forn=1 To 20 If n Mod 3＜＞Thenm=m+n\3 Next n Print n End Sub 程序运行后，如果单击命令按钮，则窗体上显示的内容是______。

A．15

B．18

C．21

D．24

在窗体上画一个命令按钮，其名称为Commandl，然后编写如下事件过程：

程序运行后，单击命令按钮，将产生l00个1000以内的随机整数，放入数组aft中，然后查找并先后使用消息框输出这100个数中的最大值Max和最小值Min，请填空。

在窗体上画一个命令按钮，其名称为Commandl，然后编写如下事件过程：

程序运行后，单击命令按钮，其输出结果为__________。

在窗体上画一个名称为Commandl的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() c="ABCD" For n=1 To 4 Print ______ Next End Sub 程序运行后，单击命令按钮，要求在窗体上显示如下内容： D CD BCD ABCD 则在 ______ 处应填入的内容为

A．Left(c，n)

B．Right(c，n)

C．Mid(c，n，1)

D．Mid(c，n，n)

在窗体上画一个名称为Commandl的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() For n=1 To 20 If n Mod 3＜＞0 Then m=m+n\3 Next n Print n End Sub 程序运行后，如果单击命令按钮，则窗体上显示的内容是______。

A．15

B．18

C．21

D．24

在窗体上画一个名称为Commandl的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() y = 8 Print fun1(1 + fun1(fun1(fun1(y)))*10) End Sub Private FLinctiOn fUnl(A)funl(A)= 1 + a End Function 程序运行后，单击命令按钮，则窗体上显示的内容是

A．112

B．2

C．909090

D．1001

在窗体上画一个名称为Commandl的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim n As Integer For n = 0 To 9 Step 3 Print rel(n)； Next n End Sub Private Function rel(ByVal i As Integer)As Integer Dim x As Integer x = 0 For j = 1 To i If i ＜ 5 Then rel = i： EXit Function x = x + i Next i rel = x End Function 程序运行后，单击命令按钮，则窗体上显示的内容是

A．1 3 5 7

B．2 8 14 53

C．0 3 21 45

D．0 5 11 34