填空题
在窗体上画一个命令按钮，然后编写如下事件过程：
在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
x=0
Do Until x=-1
a=InputBox("请输入第一个数字a的值")
a=Val(A)
b=InputBox("请输入第二个数字b的值")
b=Val(b)
x=InputBox("请输入第三个数字x的值")
x=Val(x)
a=a + b + x
Loop
Print a
End Sub
在程序运行后，单击命令按钮，在对话框中分别输入5，4，8，5，8，-1，输出结果为 ______ 。
发布于 2022-05-11 10:20:29
登录后免费查看答案
关注者
0
被浏览
10
1 个回答
推荐阅读
-
在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Co mmand1＿Click（）x＝0Do Until x＝－1a＝InputBox（＂请输入A 的值＂）a＝Val（a）b ＝InputBox（＂请输入B的值＂）b ＝Val（b）x＝InputBox（＂请输入x 的值＂）x＝Val（x）a＝a＋b ＋xLoopPrint aEnd Sub程序运行后，单击命令按钮，依次在输入对话框中输入5、4、3、2、1、－1，则输出结果为（ ）。
2022-05-11 关注 0 浏览15 1答案
-
有如下事件过程：Private Sub Command1_Click()b=10Do Until b=-1a=InputBox("请输入a的值")a=Val(A)b=InputBox("请输入b的值")b=Val(b)a=a * bLoopPrint aEnd Sub程序运行后，依次输入数值30，20，10，－1，输出结果为
2022-05-11 关注 0 浏览10 1答案
-
在窗体上画一个命令按钮，名称为 Command1, 然后编写如下代码：Option Base 0Private Sub Command1_Click()Dim A (4)As Integer,B(4) As IntegerFor k=0 To 2A(k+1)=InputBox(“ 请输入一个整数 ”)B(3-k)=A(k+1)Next kPrint B(k)End Sub程序运行后，单击命令按钮，在输入对话框中分别输入 2 、 4 、 6 ，输入结果为 （ ） 。
2022-05-11 关注 0 浏览14 1答案
-
有下列事件过程：Private Sub Co mmand1＿Click（ ）b ＝10Do Until b ＝－1a＝InputBox（＂请输入a 的值＂）a＝Val（a）b ＝InputBox（＂请输入b 的值＂）b ＝Va（b）a＝a＊bLoopPrint aEnd Sub程序运行后，依次输入数值30，20，10，－1后，输出结果是（ ）。
2022-05-11 关注 0 浏览11 1答案
-
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()x = 0n = InputBox("")For i = 1 To nFor j = 1 To ix = x + 1Next jNext iPrint xEnd Sub程序运行后，单击命令按钮，如果输入3，则在窗体上显示的内容是
2022-05-11 关注 0 浏览20 1答案
-
在窗体上画一个文本框，然后编写如下事件过程：Private Sub Form_Click()x = InputBox("请输入一个整数")Print x + Text1.TextEnd Sub程序运行时，在文本框中输入456，然后单击窗体，在输入对话框中输入123，单击“确定”按钮后，在窗体上显示的内容为（ ）。
2022-05-11 关注 0 浏览20 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答案
-
设有下列程序Private Sub Form Click（ ）X=50For i=1 T0 4y=InputBox("请输入一个整数")y=Val(v)If y Mod 5=0 Thena=a+yx=yElsea=a+xEnd IfNext iPrint aEnd Sub程序运行后，单击窗体，在输入对话框中依次输入15、24、35、46，输出结果为（ ）。
2022-05-11 关注 0 浏览14 1答案
-
在窗体上画一个命令按钮，其名称为Command1，然后编写如下程序：Function M(x As Integer,y As Integer)As IntegerM=IIf(x>y,x,y)End FunctionPrivate Sub command1_Click()Dim a As Integer,b As Integera=100b=200Print M(a,b)End Sub 程序运行后，单击命令按钮，输出结果为______ 。
2022-05-11 关注 0 浏览19 1答案
-
设有下列程序Private Sub Form＿Click（）x＝50For i ＝1To 4y ＝InputBox（＂请输入一个整数＂）y ＝Val（y）If y Mod 5＝0Thena＝a＋yx＝yElsea＝a＋xEnd IfNext iPrint aEnd Sub程序运行后，单击窗体，在输入对话框中依次输入15、24、35、46，输出结果为（ ）。
2022-05-11 关注 0 浏览15 1答案
