单选题
窗体上有一个名称为Co mmand1的命令按钮，其单击事件过程如下：
窗体上有一个名称为Co mmand1的命令按钮，其单击事件过程如下：
Private Sub Co mmand1＿Click（）
Di ma，b（2，3）As Integer
a＝Array（3，7，5，11，31，43，17，62，9，23，37，41）
i ＝0
Do While i ＜＝UBound（a）
For j＝0To 2
For k ＝0To 3
b（j，k）＝a（i）
i ＝i ＋1
Next k
Next j
Loop
Print b（2，2）
End Sub
运行程序，窗体上显示的是（ ）。
发布于 2022-05-11 09:59:31
登录后免费查看答案
关注者
0
被浏览
13
1 个回答
推荐阅读
-
窗体上有一个名称为Co mmand1的命令按钮，其事件过程如下：Private Sub Co mmand1＿Click（）Di mi As Integer ，j As Integer ，k As IntegerDi ms As Doubles ＝0：i ＝1：j＝0：k ＝－1Do While i ＜6s ＝s ＋k＊（j／i）i ＝i ＋1j＝j＋1k ＝－kLoopPrint sEnd Sub以上程序所计算的表达式是（ ）。
2022-05-11 关注 0 浏览15 1答案
-
在窗体上面1个名称为Co mmand1的命令按钮，然后编写下列事件过程Option Base 1Private Sub Co mmand1＿Click（）Di ma（5，5）As IntegerFor i ＝1To 5 For j＝1To 5a（i ，j）＝（i ＋j ）＊5＼10Next jNext is ＝0For i ＝1To 5s ＝s ＋a（i ，i）Next iPrint sEnd Sub程序运行后，单击命令按钮，输出结果是（ ）。
2022-05-11 关注 0 浏览15 1答案
-
在窗体上画2个命令按钮，名称分别为Co mmand1、Co mmand2，然后编写下列事件过程。Const n ＝5，m＝4Di ma（m，n）Private Sub Co mmand1＿Click（）k ＝1For i ＝1To mFor j＝1To na（i ，j）＝kk ＝k ＋1Next jNext iEnd SubPrivate Sub Co mmand2＿Click（）summ＝0For i ＝1To mFor j＝1To nIf i ＝1Or i ＝m Thensumm＝summ＋a（i ，j）ElseIf j＝1Or j＝n Thensumm＝summ＋a（i ，j）End IfEnd IfNext jNext iPrint summEnd Sub过程Command1＿Click（）的作用是在二维数组a 中存放1个m 行n 列的矩阵；过程Command2＿Click（）的作用是（ ）。
2022-05-11 关注 0 浏览14 1答案
-
阅读下列程序：Private Sub Command1_Click()Dim i As Integer, k As Integerk=2For i=1 To 3Print H(k) ;Next iEnd SubFunction H(j As Integer)a=0Static ba=a + 1b=b + 1H=a*b + jEnd Function程序运行后，单击命令按钮输出结果是
2022-05-11 关注 0 浏览18 1答案
-
在窗体上画一个命令按钮，其名称为Co mmand1，然后编写下列代码：Option Base 1Private Sub Co mmand1＿Click（）Di maa＝Array（1，2，3，4）j＝1For i ＝4To 1Step －1s ＝s ＋a（i）＊jj＝j＊10Next iPrint SEnd Sub程序运行后，单击命令按钮，其输出结果是（ ）。
2022-05-11 关注 0 浏览17 1答案
-
下事件过程：Private Sub Co mmand1＿Click（）Di marray1（10，10）As IntegerDi mi ，j As IntegerFor i ＝1To 3For j＝2To 4array1（i ，j）＝i ＋jNext jNext iText1．Text ＝array1（2，3）＋array1（3，4）End Sub程序运行后，单击命令按钮，在文本框中显示的值是（ ）。
2022-05-11 关注 0 浏览13 1答案
-
以下程序段的输出结果为（ ）。Di ma（10），p（3）k ＝5For i ＝0To 10a（i）＝iNext iFor i ＝0To 2p（i）＝a（i ＋（i ＋1））Next iFor i ＝0To 2k ＝k ＋p（i）＋2Next iPrint k
2022-05-11 关注 0 浏览35 1答案
-
在窗体上画一个名称为 Commandl 的命令按钮，然后编写如下程序：Private Sub Commandl Click()Dim i As Integer, j As IntegerDim a (10,10)As IntegerFor i=1 To 3For j= i To 3a(i,j)=(i-1)*3+jPrint a (i,j);Next jPrintNext iEnd Sub程序运行后，单击命令按钮，窗体上显示的是 （ ） 。
2022-05-11 关注 0 浏览15 1答案
-
窗体上有一个名为command1的命令按钮，并有下面的程序：private sub comand1_click()dim arr(5) as integerfor k=1 to 5arr(k)=knext kprog arr()for k=1 to 5print arr(k)next kend subsub prog(a() as integer)n=ubound(a)for i=n to 2 step -1for j=1 to n-1if a(j)t=a(j):a(j)=a(j+1):a(j+1)=tend ifnext jnext iend sub程序运行时，单击命令按钮后显示的是
2022-05-11 关注 0 浏览15 1答案
-
在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：Private Sub Command1_Click()Dim a1(4, 4), a2(4, 4)For i = 1 To 4For j = 1 To 4a1(i, j) = i + ja2(i, j) = a1(i, j) + i + jNext jNext iPrint a1(3, 3); a2(3, 3)End Sub程序运行后，单击命令按钮，在窗体上输出的是
2022-05-11 关注 0 浏览19 1答案
