(14)窗体中有一个命令按钮,然后编写下列事件过程: 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,输出的结果是。
第1题:
在窗体上画一个名称为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,则在窗体上显示的内容是( )。
A.3
B.4
C.5
D.6
第2题:
在窗体上画一个名称为Comillarldl的命令按钮,然后编写如下事件过程: 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,则在窗体上显示的内容是( )。
A.3
B.4
C.5
D.6
第3题:
在窗体上画一个命令按钮,然后编写如下事件过程: x = 0 Do Until x = -1 a = val(InputBox("A的值")):b = val(InputBox("B的值")) x = val(InputBox("x的值")) a = a + b + x Loop Print a 程序运行后,单击命令按钮,依次在输入对话框中输入5、4、3、2、1、-1,则输出结果为_____。
A.14
B.3
C.2
D.12
第4题:
在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub CommAnd1_Click() For i=1 To 4 x=0 For j=1 To 3 x=j For k=1 To 2 x=x+6 Next k Next j Next i Print x End Sub 程序运行后,单击命令按钮,输出结果是______ 。
A.7
B.15
C.157
D.538
第5题:
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
x = -5
If Sgn(x) Then
y = Sgn(x ^ 2)
Else
y = Sgn(x)
End If
Print y
End Sub
程序运行后,单击命令按钮,窗体上显示的是( )。
A.-5
B.25
C.1
D.-1