在一个窗体上有两个命令按钮,cmdMax 和 cmdMin。单击cmdMax时,窗体上显示“字体由小变大”,字号每次
A.456
B.246
C.123123
D.123
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.40
B.30
C.20
D.10
A.0
B.5
C.6
D.7
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
Private Sub Command1_Click()
Dim x As Integer
Static y As Integer
x=10
y=5
Call f1(x,y)
Print x,y
End Sub
Private Sub f1(ByRef x1 As Integer, y1 As Integer)
x1=x1+2
y1=y1+2
End Sub
程序运行后,单击命令按钮,在窗体上显示的内容是()。
A.10 5
B.12 5
C.10 7
D.12 7
A.4321
B.34
C.1234
D.12
A.4321
B.34
C.1234
D.12