在窗体上画一个名称为Conunandl的命令按钮，然后编写如下程序：

Private Sub Commandl_Click()

D．imi As Intege,j As Integer

D．ima(10,10)As Integer

F．ori=1 To 3

F．orj=1 To 3

a(i,j)=(i-1)*3+j

Printa(i,j)；

Nextj

Print

Nexti

E．nd Sub

程序运行后，单击

A．

B．

C．

D．

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

[单选题]3在窗体上画一个名称为Commandl的命令按钮，然后编写如下程序： PrivateSubCommand1_Click() Static X As Integer Static Y As Integer Cls Y=1 Y=Y+5 X=5+X PrintX,Y EndSub 程序运行时，3次单击命令按钮Commandl后，窗体上显示的结果为( )。A．15 16B．156C．15 15D．56

[单选题]在窗体上画一个名称为Commandl命令按钮，然后编写如下事件过程： Private Sub Commandl_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)

[单选题]在窗体上画一个命令按钮，名称为Commad1，然后编写如下事件过程： Private Sub Command1 Click() a$="software and bardware" b$=Right(a$，8) c$=Mid(a$，1，8) MsgBox a$，，b$，c$，1 End Sub 运行程序，单击命令按钮，则在弹出的信息框的标题栏中显示的是A．soflware and hardwareB．softwareC．haldwareD．1

[单选题]在窗体上画一个命令按钮，名称为Commandl。然后编写如下程序： Private Sub Command1_Ctick() 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． HHHHHD．H HH HHHH

[单选题]在窗体上画一个名称为Commandl的命令按钮，然后编写如下程序：Private Sub Commandl_Click()D．imi As Integer,j As IntegerD．ima(10,10)As IntegerF．ori=1 To 3F．orj=1 To 3a(i，j)=(i-1)*3+jPrinta(i，j)；NextjPrintNextiE．nd SubA．B．C．D．

[单选题]在窗体上画一个名称为Commandl的命令按钮，然后编写如下程序： Option Base 1 Private Sub Commandl_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 Print d End Sub 程序运行后，如果单击命令按钮，则在窗体上输出的内容为A．

[单选题]在窗体上画一个名称为Commandl的命令按钮，然后编写如下程序：Private Sub Command1_Click（）Static x As IntegerStati cy As Integery=1y=y+5x=x+5Printx；yEnd Sub程序运行时，三次单击命令按钮Commandl后，窗体上显示的结果为（）A . 1516B . 156C . 1515D . 56

[单选题]在窗体上画一个名称为Commandl的命令按钮，然后编写如下程序： Private Sub Command1_Click() Dim i As Integer，j As Integer Dim a(10， 10)As Integer For i=1 To 3 For i=1 To 3 a(i，j)=(i-1) *3+j Print a(i，j)； Next i Print Next i End Sub 程序运行后，单击命令按钮，窗体上显示的是A．1 2 3 246 3 69B．2 3 4 3 4

[单选题]在窗体上画一个命令按钮，其名称为Commandl，然后编写如下程序： Pfivate Sub Commandl_Click() Dima(10) As Integer Dimx As Integer Fori=1 To 10 a(i)=8+i NeXt X=2 Print a(f(x)+x) End Sub Function f(X As Integer) X=X+3 f=X End FuA．12B．15C．17D．18