在窗体上添加一个名称为Command1的命令按钮，然后编写如下事件代码： Private Sub Command1_Click()
A: A=75
B: If a＜60 Then x=1
C: If a＜70 Then x=2
D: If a＜80 Then x=3
E: If a＜90 Then x=4
F: MsgBox x
G: End Sub
H: 运行窗体，单击命令按钮，则消息框的输出结果是(
I: )。A．1
J: 2
K: 3 D．4
A: A=75
B: If a＜60 Then x=1
C: If a＜70 Then x=2
D: If a＜80 Then x=3
E: If a＜90 Then x=4
F: MsgBox x
G: End Sub
H: 运行窗体，单击命令按钮，则消息框的输出结果是(
I: )。A．1
J: 2
K: 3 D．4
举一反三
- 在窗体上添加一个命令按钮Command1，然后编写如下事件过程： Private Sub Command1_Click() For i = 1 To 4 x = 4 For j = 1 To 3 x = 3 For k = 1 To 2 x = x + 6 Next k Next j Next i Print x End Sub 程序运行后，单击命令按钮，显示结果为（ ）。
- 在窗体中添加一个命令按钮(名为Command1)，然后编写如下代码： Private Sub Command1 Click( ) A＝75 If A＞60 Then I＝1 If A＞70 Then I＝2 If A＞80 Then I＝3 If A＞90 Then I＝4 MsgBox I End Sub 窗体打开运行后，单击命令按钮，则消息框的输出结果是______。 A: 1 B: 2 C: 3 D: 4
- 在窗体中添加一个命令按钮(名称为Command1)，然后编写如下代码： Private Sub Command1_Click( ) A=75 If A＞60 Then I=1 If A＞70 Then I=2 If A＞80 Then I=3 If A＞90 Then I=4 MsgBox I End Sub 窗体打开运行后，单击命令按钮，则消息框的输出结果是______。 A: 1 B: 2 C: 3 D: 4
- 在窗体上添加一个名称为Command1的命令按钮，编写如下代码： Private Sub f(ByVal x As Integer) x=x+4 End Sub Pvivate Sub Command1_Click() i=3 Call f(i) If i＞4 Then i=i*2 MsgBox i End Sub 运行窗体后，单击命令按钮，则消息框的输出结果为______。
- 在窗体中有1个命令按钮Command1和1个文本框Text1,编写事件代码如下:Private Sub Command1_Click() For i=1 To 4 x=3 For j=1 To 3 For k=1 To 2 x=x+3 Next k Next j Next i Text1.Value=Str(x) End Sub 打开窗体运行后,单击命令按钮,文本框Text1输出的结果是