程序代码如下，当单击窗体上的Command1控件时，在窗体上输出的结果是( )。 Private Sub Command1_Click() Dim aa(3，3)As Integer Dim i As Integer,j As Integer Dim s As Integer For i=0 To 3 For j=0 To 3 aa(i，j)=i*4+j+1 Next j Next i For i=0 To 3 s=s+aa(i，1) Next i Print s End Sub

A．32

B．28

C．30

D．36

[单选题]程序代码如下，当单击窗体上的Command1控件时，窗体上输出的结果是( )。 Private Sub Command1_Click() Dim Y As Integer，I As Integer Dim A(7)As Integer Y=18：I=0 Do A(I)=Y Mod 2 I=I+1 Y=Y/2 Loop Until Y＜1 For j=I-1 To 0 Step-1 Print A(j)； Next j End SubA．1 0 0 0B．1 0 0 1 0C．0 0 1 1 0D

[单选题]程序代码如下，当单击窗体上的Command1控件时，窗体上显示的结果是( )。 Private Sub Command1_Click() Dim i As Integer，a(9)As Integer For i=9 To 0 Step-1 a(i)=10-i Next i Print a(2); a(5)；a(8) End SubA．2 5 8B．7 4 1C．8 5 2D．3 6 9

[单选题]在窗体上添加一个命令按钮控件，名为Command1，事件过程如下，则执行结果是 Option Base 1 Private Sub Command1_Click() Dim a(5)As Integer Dim k As Integer Dim total As Integer a(1) = 2 a(2) = 5 a(3) = 4 a(4) = 10 a(5) = 6 For k = 1 To 5 Total = total + a(k) Next k Print total End SubA.

[单选题]下列程序段，运行后窗体上输出结果是( )。Private Sub Command1_Click()a=5:b=4:c=3:d=2x=3＞2*b Or a=c And b＜＞c Or c＞dPrintxE．nd SubA．1B．TrueC．FalseD．2

[单选题]以下程序运行时，单击窗体后，在窗体上输出的结果是 ______。 Private SubForm_Click() Dim a As Integer，b As Integer a=10 ：b=20 Call ff(a，B)Print a，b End Sub Private Sub ff(x As Integer，y As Integer) x=x+y y=x+y End SubA．30 50B．30 30C．20 20D．10 20

[单选题]有如下程序，单击command1后窗体显示结果是( )OptionBase1PrivateSubCommand1_Click()D．imaa=Array(1,2,3,4,5)F．ori=LBound( )ToUBound( )a(i)=i*a(i)NextiPrinti;UBound( )E．ndSubA．65B．625C．不确定D．程序出错

[单选题]在窗体上添加一个按钮，名为Command1，然后编写如下的事件过程，输出结果为Private Sub Comand1_Click()F．or i=1 To 4x=4F．or j=1 To 3x=3F．or k=1 To 2x=x+5NextNextNextPrint xE．nd SubA．13B．26C．30D．40

[单选题]在窗体上添加一个按钮，名为Command1，然后编写如下的事件过程，输出结果为 Prinvate Sub Comandl_Click() For i=1 To 4 x=4 For j=1 To 3 x=3 For k=1 To 2 x=x+5 Next Next Next Print x End SubA．13B．26C．30D．40

[单选题]已知一窗体上命令按钮Command1的Click事件代码如下，则单击Command1后，文本显示的文字为（）。PrivateSubCommand1_Click（）Text1.Text="湖南省"&"计算机"+"等级考试"Text1.ForeColor=vbRedText1.BackColor=vbGreenText1.FontBold=TrueEndSubA . 湖南省计算机等级考试B . 计算机C . 等级考试D . 计算机等

[单选题]在通用声明中定义a，在窗体中添加一个命令按钮Command1，编写如下程序代码：D．imaAsIntegerSubtest()a=a+1:b=b+1:c=c+1Print"Sub:";a;"，";b;"，";cE．ndSubPrivateSubCommand1_Click()a=2:b=3:c=4C．alltestC．alltestE．ndSub程序运行后，单击命令按钮，窗体中将显示( )A．Sub：3，4，5Sub：4，5，6B．Su