单选题
在窗体上画一个名称为 Commandl 的命令按钮，然后编写如下程序：
在窗体上画一个名称为 Commandl 的命令按钮，然后编写如下程序：
Private Sub Commandl Click()
Dim i As Integer, j As Integer
Dim a (10,10)As Integer
For i=1 To 3
For j= i To 3
a(i,j)=(i-1)*3+j
Print a (i,j);
Next j
Print
Next i
End Sub
程序运行后，单击命令按钮，窗体上显示的是 （ ） 。
发布于 2022-05-11 10:19:03
登录后免费查看答案
关注者
0
被浏览
15
1 个回答
推荐阅读
-
在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：Private Sub Command1_Click()Dim i As Integer,j As IntegerDim a(10,10)As IntegerFor i=1 To 3For j=1 To 3a(i,j)=(i-1)*3+jPrint a(i,j);Next jPrintNext jEnd Sub程序运行后，单击命令按钮，窗体上显示的是
2022-05-11 关注 0 浏览20 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答案
-
在窗体上画一个名称为Label1的标签，然后编写如下事件过程：Private Sub Form_Click()Dim arr(10, 10) As IntegerDim i As Integer, j As IntegerFor i = 2 To 4For j = 2 To 4arr(i, j) = i * jNext jNext iLabel1.Caption = Str(arr(2, 2) + arr(3, 3))End Sub程序运行后，单击窗体，在标签中显示的内容是（ ）。
2022-05-11 关注 0 浏览13 1答案
-
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Dim array1(10, 10) As IntegerDim i As Integer, j As IntegerFor i = 1 To 3For j = 2 To 4array1(i, j) = i + jNext jNext iText1.Text = array1(2, 3) + array1(3, 4)End Sub程序运行后，单击命令按钮，在文本框中显示的值是
2022-05-11 关注 0 浏览11 1答案
-
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Dim array1(10, 10) As IntegerDim i As Integer, j As IntegerFor i = 1 To 3For j = 2 To 4array1(i, j) = i + jNext jNext iText1.Text = array1(2, 3) + array1(3, 4)End Sub程序运行后，单击命令按钮，在文本框中显示的值是
2022-05-11 关注 0 浏览14 1答案
-
在窗体上面1个名称为Command1的命令按钮，然后编写下列事件过程Option Base 1Private Sub，Command1 Click（ ）Dim a(5，5)ks IntegerFor i=1 To jFor j=1 To 5a(i，j)=(i+j)*5＼10Next jNext iS=0For i=1 To js=s+a(i，i)Next iPrint sEnd Sub程序运行后，单击命令按钮，输出结果是（ ）。
2022-05-11 关注 0 浏览14 1答案
-
在窗体上画一个命令按钮，名称为Command1。然后编写如下程序：Private Sub Command1_Click() For I=1 To 4 For J=0 To 1 Print Chr$(65+I); Next J Print Next IEnd Sub程序运行后，如果单击命令按钮，则在窗体上显示的内容是
2022-05-11 关注 0 浏览11 1答案
-
有以下程序：Option Base 1Dim arr() As IntegerPrivate Sub Form_Click()Dim i As Integer,j As IntegerReDim arr(3,2)For i=1 To 3For j=1 To 2arr (i,j)=i*2+jNext jNext iReDim Preserve arr(1,4)For j=3 To 4arr(3,j)=j+9Next jPrint arr(3,2);arr(3,4)End Sub程序运行后，单击窗体，输出结果为 （ ） 。
2022-05-11 关注 0 浏览13 1答案
-
阅读程序：Option Base 1Dim arr() As IntegerPrivate Sub Form_Click()Dim i As Integer, j As IntegerReDim arr(3, 2)For i = 1 To 3For j = 1 To 2arr(i, j) = i * 2 + jNext jNext iReDim Preserve arr(3, 4)For j = 3 To 4arr(3, j) = j + 9Next jPrint arr(3, 2) + arr(3, 4)End Sub程序运行后，单击窗体，输入结果为（ ）。
2022-05-11 关注 0 浏览21 1答案
-
在窗体上画一个命令按钮（其名称为Commandl），然后编写如下代码：Private Sub Command1_Click()Dim aa = Array(1, 2, 3, 4)i = 3: j = 1Do While i >= 0s = s + a(i) * ji = i – 1 : j = j * 10LoopPrint sEnd Sub运行上面的程序，单击命令按钮，则输出结果是（ ）。
2022-05-11 关注 0 浏览20 1答案
