在窗体上画一个命令按钮,然后编写如下程序:(假定变量x是一个窗体级变量) Dim x As Intege
在窗体上画一个命令按钮,然后编写如下程序:(假定变量x是一个窗体级变量) Dim x As Integer Sub inc(a As Integer) x=x+a End Sub Private Sub Command1_Click() inc 2 inc 3 inc 4 Print x; End Sub 程序执行后,单击Command1命令按钮,输出的结果是【 】。
在窗体上画一个命令按钮,然后编写如下程序:(假定变量x是一个窗体级变量) Dim x As Integer Sub inc(a As Integer) x=x+a End Sub Private Sub Command1_Click() inc 2 inc 3 inc 4 Print x; End Sub 程序执行后,单击Command1命令按钮,输出的结果是【 】。
A.-5
B.25
C.1
D.-1
Private Sub Command1_Click()
Dim a As Integer, s As Integer
a = 8
s = 1
Do
s = s + a
a = a-1
Loop While a <= 0
Print s; a
End Sub
程序运行后,单击命令按钮,则窗体上显示的内容是()。
A.7 9
B.34 0
C.9 7
D.死循环
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim num As Integer num = 1 Do Until num > 6 Print num; num = num + 2.4 Loop End Sub 程序运行后,单击命令按钮,则窗体上显示的内容是()。
A.无数据输出
B.1 3.4 5.8
C.1 4 7
D.1 3 5
A.4321
B.34
C.1234
D.12
A.4321
B.34
C.1234
D.12
Private Sub Command1_Click()
Dim a, b As Integer
a = val(InputBox("Enter the First integer"))
b = val(InputBox("Enter the Second integer"))
Print a + b
End Sub
程序运行后,单击命令按钮,先后在两个输入对话框中分别输入123和456,则输出结果是和()。
A.579
B.123
C.456
D.123456
A.15
B.14
C.13
D.12
在窗体上画—个命令按钮,其名称为Command1,然后编写如下程序: Function M(x As Integer,y As Integer) M=IIf(x>y,x,y) End FUNction Private Sub Command1 Click() Dim a As Integer,b As Integer a=100 b=200 Print M(a,B0 End Sub 程序运行后,单击命令按钮,输出结果为【 】。
A.15
B.14
C.13
D.12
A.40
B.30
C.20
D.10
A.25
B.24
C.15
D.10