单项选择题

单击命令按钮，并在对话框内依次输入5，7，6下列程序段的执行结果为______。 Private Sub Command1_Click() Dim n AS Integer, a As Integer, b As Integer, c As Integer n = 0 For i = 1 To 3 a = InputBox ("请输入数字") n = n+a*a If n ＞ 50 Then GoTo ex End If Next i ex: Print n End Sub

A．25
B．74
C．85
D．110
<上一题 目录 下一题>
热门 试题

单项选择题
下列程序段的执行结果为______。 Private Sub Command1_Click() a=1：b=1 Select Case a Case 1 Select Case b Case 0 Print 你好! Case 1 Print Hello! End Select Case 2 Print 谢谢使用! End Select End Sub
A．你好!
B．谢谢使用!
C．Hello!
D．你好!谢谢使用!
单项选择题
单击命令按钮，并在对话框内输入6，下列程序段的执行结果为______。 Private Sub Command1_Click() Dim n As Integer n=InputBox ( 请输入日期 ) Select Case n Case Is ＜= 0 n=InputBox( 错误!请重新输入日期! ) Case Is＞7 n=InputBox( 错误!请重新输入日期! ) Case 1 To 3 Print 江苏 Case 4 To 5 Print 浙江 Case 6 To 7 Print 双休日 End Select End Sub
A．错误!请重新输入日期!
B．江苏
C．浙江
D．双休日
相关试题