单击命令按钮,并在对话框内输入6,下列程序段的执行结果为______。Private Sub Command1_Click()Di
单击命令按钮,并在对话框内输入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.双休日