单击命令按钮,并在对话框内输入6,下列程序段的执行结果为______。 Private Sub Command1_Click() Dim n As Integer n=InputBox ("请输入日期") S

admin2009-07-23  25

问题 单击命令按钮,并在对话框内输入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、双休日

答案D

解析
转载请注明原文地址:https://kaotiyun.com/show/hf1p777K
0

最新回复(0)