[单选题]

程序代码如下,当单击窗体上的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控件时,窗体上输出的结果是()。Pr

[单选题]程序代码如下,当单击窗体上的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控件时,窗体上显示的结果是()。Pr

    [单选题]程序代码如下,当单击窗体上的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,事件过程如下,则执行结果是

    [单选题]在窗体上添加一个命令按钮控件,名为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

    [单选题]下列程序段,运行后窗体上输出结果是( )。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

    [单选题]以下程序运行时,单击窗体后,在窗体上输出的结果是 ______。 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后窗体显示结果是( )OptionBase1Pr

    [单选题]有如下程序,单击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,然后编写如下的事件过程,输出结果为P

    [单选题]在窗体上添加一个按钮,名为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,然后编写如下的事件过程,输出结果为P

    [单选题]在窗体上添加一个按钮,名为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事件代码如下,则单击Comman

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

  • 查看答案
  • 在通用声明中定义a,在窗体中添加一个命令按钮Command1,编写如下程序代码:

    [单选题]在通用声明中定义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

  • 查看答案
  • 程序代码如下,当单击窗体上的Command1控件时,在窗体上输出的结果是()。P