单选题
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
x = 0
n = InputBox("")
For i = 1 To n
For j = 1 To i
x = x + 1
Next j
Next i
Print x
End Sub
程序运行后，单击命令按钮，如果输入3，则在窗体上显示的内容是
发布于 2022-05-11 10:20:03
登录后免费查看答案
关注者
0
被浏览
20
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答案
-
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1 CliCk()a=0n=InputBox(””)For i=1 To nFor i=1 To iA=a+1Next jNext iPrint aEnd Sub程序运行后，单击命令按钮，如果输入4，则在窗体上显示的内容是（）。
2022-05-13 关注 0 浏览14 1答案
-
在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：Private Sub Command1_Click()Dim i As Integer, x As IntegerFor i = 1 To 6If i = 1 Then x = iIf i <= 4 Thenx = x + 1Elsex = x + 2End IfNext iPrint xEnd Sub程序运行后，单击命令按钮，其输出结果为（ ）。
2022-05-11 关注 0 浏览16 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()Static x As IntegerClsFor i=1 To 2y=y+xx=x+2NextPrint x,yEnd Sub程序运行后，连续三次单击Command1按钮后，窗体上显示的是
2022-05-11 关注 0 浏览16 1答案
-
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Option Base 1Private Sub Command1_Click()Dim aa= Array(1,2,3,4,5)For i=1 To UBound(a)a(i) = a(i)+i-1NextPrint a(3)End Sub程序运行后，单击命令按钮，则在窗体上显示的内容是
2022-05-11 关注 0 浏览11 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答案
-
在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：Option Base 1Private Sub Command1_Click()Dim a As Varianta=Array(1,2,3,4,5)Sum=0For i=1 To 5Sum = sum+a(i)Next ix=Sum/5For i =1 To 5If a(i)>x Then Print a(i);Next iEnd Sub程序运行后，单击命令按钮，在窗体上显示的内容是
2022-05-11 关注 0 浏览13 1答案
-
有如下事件过程：Private Sub Form Click（ ）Dim n As Integcrx=0n=InputBox("请输入一个整数")For i=1 To ifor j =1 To jx=x+1Next jNext iPrint xEnd sub程序运行后，单击窗体，如果在输入对话框中输入5，则在窗体上显示的内容是（ ）。
2022-05-11 关注 0 浏览9 1答案
-
在窗体上画1个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()a=0For i=1 To 2For j=1 To 4If j Mod 2<>0 Thena=a-1End Ifa=a+1Next jNext iPrint aEnd Sub程序运行后，单击命令按钮，输出结果是。
2022-05-11 关注 0 浏览17 1答案
