在窗体中添加一个命令按钮Command1,并编写如下程序:
PrivateSubCommand1_Click()
x=InputBox(x)
Ifx^2=9Theny=x
Ifx^2<9Theny=1/x
Ifx^2>9Theny=x^2+1
Printy
EndSub
程序运行时,单击命令按钮,在InputBox中输入3,然后单击“确定”按钮,程序的运行结果为()。
PrivateSubCommand1_Click()
x=InputBox(x)
Ifx^2=9Theny=x
Ifx^2<9Theny=1/x
Ifx^2>9Theny=x^2+1
Printy
EndSub
程序运行时,单击命令按钮,在InputBox中输入3,然后单击“确定”按钮,程序的运行结果为()。
举一反三
- 在窗体中添加一个命令按钮 Command1 , 并编写如下程序 : Private Sub Command1_Click() x = InputBox(x) If x ^ 2 = 9 Then y = x If x ^ 2 < 9 Then y = 1 / x If x ^ 2 > 9 Then y = x ^ 2 + 1 Print y End Sub 程序运行时,单击命令按钮,在 InputBox 中输入 3 ,然后单击“确定”按钮,程序的运行结果为( )。
- 在窗体上添加一个命令按钮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 程序运行后,单击命令按钮,显示结果为( )。
- 在窗体上画一个命令按钮,然后编写如下程序: Private Sub Comrnand3_Click( ) Cop 2 Cop 3 Cop 4 End Sub Sub Cop (a As Integer) Static x As Integer x=x + a Print x; End Sub 程序运行后,单击命令按钮,输出结果为 A: 2 3 4 B: 2 5 9 C: 3 5 4 D: 2 4 3
- 若x和y是程序中的两个整型变量,则下列if语句中正确的是()。 A: if(x==0)y=1;elsey=2; B: if(x==0)theny=lelsey=2; C: if(x==0)y=lelsey=2; D: ifx==0y=1;elsey=2;
- 在窗体上画一个命令按钮<其名称为Command1),然后编写如下事件过程: Private Sub Command1 Click() For i=1 T04 If i=1 Thenx=i If i<=4 Then x=x+1 Print x Next i End Sub 程序运行后,单击命令按钮;其输出结果为 ______。 A: A) 1 2 3 4 B: B) 2 3 4 5 C: C) 2 3 4 4 D: D) 3 4 5 6