单选题
在窗体上面1个名称为Command1的命令按钮，然后编写下列事件过程
在窗体上面1个名称为Command1的命令按钮，然后编写下列事件过程
Option Base 1
Private Sub，Command1 Click（ ）
Dim a(5，5)ks Integer
For i=1 To j
For j=1 To 5
a(i，j)=(i+j)*5＼10
Next j
Next i
S=0
For i=1 To j
s=s+a(i，i)
Next i
Print s
End Sub
程序运行后，单击命令按钮，输出结果是（ ）。
发布于 2022-05-11 09:56:34
登录后免费查看答案
关注者
0
被浏览
14
1 个回答
推荐阅读
-
在窗体上画1个名称为Command1的命令按钮，然后编写如下事件过程Option Base 1Pribate Sub Command1_Click()Dim a(5.5) As IntegerFor i=1 To 5a(I,j)*5\10Next jNext iS=0For i=1 To 5S=s+a(i,i)Next iPrint sEnd Sub程序运行后，单击命令按钮，输出结果是( )
2022-05-11 关注 0 浏览14 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答案
-
在窗体上画一个命令按钮，其名称为Command1，然后编写下列代码：Option Base lPrivate Sub Command1 Click（ ）Dim aa=Array(1，2，3，4)j=1For i=4 To 1 Step-1s=s+a(i)*jj=j*10Next iPrint SEnd Sub程序运行后，单击命令按钮，其输出结果是（ ）。
2022-05-11 关注 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，然后编写如下代码：Option Base 1Private Sub Command1_Click()Dim aa=Array(1,2,3,4)j=1For i=4 To 1 Step -1s=s+a(i)*jj=j*10Next iPrint sEnd Sub程序运行后，单击命令按钮，其输出结果是（ ）。
2022-05-11 关注 0 浏览17 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答案
-
在窗体上画一个命令按钮（其NAME属性为Command1），然后编写如下代码:Option Base 1Private Sub Command1_Click()Dim as = 0a = Array(1,2,3,4)j = 1For i = 4 To 1 Step -1s = s + a(i) * jj = j * 10Next iPrint sEnd Sub运行上面的程序，单击命令按钮，其输出结果是
2022-05-11 关注 0 浏览13 1答案
-
设有命令按钮Command1的单击事件过程，代码如下：Private Sub Command1_Click()Dim a(3，3)As IntegerFor i=1 To 3For j=1 To 3a(i，j)=i*j+iNext jNext iSum=0For i=1 To 3Sum=Sum+a(i，4-i)Next iPrint SumEnd Sub运行程序，单击命令按钮，输出结果是。
2022-05-11 关注 0 浏览15 1答案
-
在窗体上画一个命令按钮(其名称为Command1)，然后编写如下代码：Private Sub Command1 Click（ ）Dim aa=Array(1，2，3，4)i=3：j=1Do While>=0s=s+a i)*ji=i-1j=j*1cLoopPrint SEnd Sub运行上面的程序，单击命令按钮，则输出结果是（ ）。
2022-05-11 关注 0 浏览16 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答案
