在窗体上画一个名称为Command1的命令按钮，然后编写如下程序 _______。 Dim k As Integer Private Sub Form_Load() k=5 End Sub Private Sub Command Click() Static b As Integer b ＝ b + k k=k+1 Print k，b End Sub 程序运行时，两次单击命令按钮Command1后，在窗体上显示的第二行是 _______。

A．7 11

B．5 11

C．76

D．2 1

[单选题]在窗体上画一个命令按钮，名称为Command1。然后编写如下程序：Private Sub Command1_Click()F．or I=1 To 2F．or J=1 To IPrint String(I，"Hello")；Next JPrintNext IE．nd Sub程序运行后，如果单击命令按钮，则在窗体上显示的内容是A．H HH HHB．H HHHHC．HHHHHD．H HH HHHH

[单选题]在窗体上画一个命令按钮，名称为Command1。然后编写如下程序：Private Sub Command1_ Click()Dim a As Integer, b As Integerb = 1for a = 1 To 100 if b＞= 10 then exit for if b Mod 3 = 1 then b=b+3 End ifNext aPrint aEnd Sub在命令按钮上单击后，窗体上显示的结果是______。A．101B．6C．5D．4

[单选题]在窗体上画一个命令按钮，名称为Command1，然后编写如下程序：Private Sub Command1_ Click()Dim a As Integer, b As Integerdo while b ＜100 b=b+5 a=a+ b if b ＞20 then exit doLoopPrint a, bEnd Sub程序运行后，如果甲击命令按钮，则在窗体上显示的内容是______。A．50 20B．75 25C．50 25D．75 20

[单选题]在窗体上画一个命令按钮，名称为Command1。然后编写如下程序：Private Sub Command1_ Click() for i = 1 To 4 for j= 0 To i Print Chr＄(65 +i) Next j Print Next iEnd Sub程序运行后，如果单击命令按钮，则在窗体上显示的内容是______。A．BB CCC DDDD EEEEEB．B CC DDD EEEEC．AA AA CCCC DDDDDD．A BB CCC DDDD

[单选题]在窗体上画一个命令按钮，名称为Command1。然后编写如下程序： Private Sub Command1_Click() Dim a As Integer，b As Integer，c As Integer If a=0 Then x=x-1 Else If b＜＞0 Then End If End If If c＜＞0 Then x=3 Else x=4 End If Print x End Sub 程序运行后，单击命令按钮，其输出结果为 ______。A．34B．4C．35D．3

[单选题]在窗体上画一个命令按钮，名称为Command1，然后编写如下程序： Private Sub Command1_Click() For i=1 To 2 For j=1 To i Print String(i,"Hello") Next j Print Next i End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是( )。A．H HH HHB．H HHHHC．HHHHH HH HHHHD．H

[单选题]在窗体上画一个命令按钮，名称为Command1。然后编写如下程序： Pnvate Sub Command1_Click() Dim x As Integer，y As Integer，t As Integer x=10：y=20：t=0 If x=y Then t=x：x=y：y=t Print x；y End Sub程序运行后，如果单击命令按钮，则在窗体上显示的内容是( )。A．10 20B．20 0C．20 10D．20 20

[单选题]在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：Option Base 1Private Sub Command1_Click（）Dim c As Integer, d As Integerd = 0c = 6x = Array（2, 4, 6, 8, 10, 12）For i = 1 To 6 If x（i） > c Then d = d + x（i） c = x（i） Else d = d - c End IfNext

[单选题]在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：D．im SW As BooleanF．unction func（X As Integer） As IntegerIf X < 20 ThenY = XE．lseY = 20 + XE．nd Iffunc = YE．nd FunctionPrivate Sub Form_MouseDown（Button As Integer, Shift As Integer, X As Single, Y As Single）

[主观题]在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：Option Base 1Private Sub Command1_Click（）D．im a（10） As IntegerF．or i = 1 To 10a（i） = iNextC．all swap （ ______ ）F．or i = 1 To 10Print a（i）;NextE．nd SubSub swap（b（） As Integer）n = _______F．or i = 1 To n / 2t = b（i）b（i）