[单选题]

在窗体上画一个命令按钮,其名称为Commandl,然后编写如下事件过程: Private Sub Commandl_Click() Dim al(4,4),a2(4,4) Dim i As Integer,j As Integer For i=1 To 4 For j=1 To 4 a1(i,j)=i+j a2(i,j)=a1(i,j)+i+j Next j Next i Print al(3,3);a2(3,3) End Sub 程序运行后,单击命令按钮,在窗体上输出的是______。

A. 6 6

B.10 5

C.7 21

D.6 12

参考答案与解析:

相关试题

在窗体上画一个名称为Commandl的命令按钮,然后编写如下事件过程: Priv

[单选题]在窗体上画一个名称为Commandl的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim x As Integer,y As Integer x = 41: y = 54 Call sub1(x,y) x = x + 1 Print x; y End Sub Private Sub sub1(n As Integer, ByVal m As Integer) n=n Mod 10 m=m/10 End Sub 程序运行后,单击命令按钮,则窗体上显示

  • 查看答案
  • 在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程:Priv

    [单选题]在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程:Private Sub Command1_Click()D.im i As Integer, x As IntegerF.or i = 1 To 6If i = 1 Then x = iIf i <= 4 Thenx = x + 1E.lsex = x + 2E.nd IfNext iPrint xE.nd Sub程序运行后,单击命令按钮,其输出结果为( )。A.9B.6C.12D.15

  • 查看答案
  • 在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程:Priv

    [单选题]在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程:Private Sub Command1_Click() Dim a1(4,4),a2(4,4) For i=1 To 4 For j=1 To 4 al(i,j)=i+j a2(i,j)=a1(i,j)+i+j Next j Next i Print al(3,3);a2(3,3)End Sub 程序运行后,单击命令按钮,在窗体上输出的是( )。A.6 6 B.10 5 C.7 21 D.6 12

  • 查看答案
  • 在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程:Priv

    [单选题]在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程:Private Sub Command1_Click()D.im aS,b$,c$,k%a=”ABCD”b=”123456”c=””k=1D.o While k<=Len(a) Or k<=Len(b)If k<=Len(a)Thenc=c&Mid(a,k,1)E.nd IfIf k<=Len(b)Thenc=c&Mid(a,k,1)E.nd Ifk=k+1LoopPrint cE.n

  • 查看答案
  • 在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程:Priv

    [单选题]在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1_Click() a=12345 Print Format$(a,"000,00") End Sub 程序运行后,单击命令按钮,窗体上显示的是( )。A.123.45B.12345.00C.12345D.00123.45

  • 查看答案
  • 在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程:Priv

    [单选题]在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1_ Click() Dim arr (10) For i = 1 To 10 arr (i) = i ^ 2 Next i Print arr(i - 2) End Sub程序运行后,单击命令按钮,在窗体上输出的是______。A.49B.64C.81D.100

  • 查看答案
  • 在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程:Priv

    [单选题]在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1 Click() For i=1 To 4 If i=1 Then x=i If i<=4 Then x=X+1 Print x Next i End Sub 程序运行后,单击命令按钮,其输出结果为:_______。A.1 2 3 4B.2 3 4 5C.2 3 4 4D.3 4 5 6

  • 查看答案
  • 在窗体上画一个命令按钮,名称为Commandl,然后编写如下事件过程:Priva

    [单选题]在窗体上画一个命令按钮,名称为Commandl,然后编写如下事件过程: Private Sub Commandl_Click() a$="software and hardware" b$=Right(a$,8) c$=Mid(a$,1,8) MsgBoxa$,,b$,c$,1 End Sub 运行程序,单击命令按钮,则在弹出的信息框的标题栏中显示的是______。A. software and hardwareB.softwareC.hardwareD.1

  • 查看答案
  • 在窗体上画一个名称为Commandl命令按钮,然后编写如下事件过程:Privat

    [单选题]在窗体上画一个名称为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)

  • 查看答案
  • 在窗体上画一个命令按钮,名称为Commandl,然后编写如下事件过程:Priva

    [单选题]在窗体上画一个命令按钮,名称为Commandl,然后编写如下事件过程: Private Sub Commandl_Click() Dim a() a=Array(“机床”,”车床”,”钻床”,”轴承”) Print a(2) End Sub 程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。A.机床B.车床C.钻床D.轴承

  • 查看答案
  • 在窗体上画一个命令按钮,其名称为Commandl,然后编写如下事件过程:Priv