单项选择题

下面程序段执行结果为

x=Int(Rnd() +4)

Select Case x

Case 5

Print "excellent"

Case 4

Print "good"

Case 3

Print "pass"

Case Else

Print "fail"

End Select

A．excellent
B．good
C．pass
D．fall
<上一题 目录 下一题>
热门 试题

单项选择题
假定有如下的窗体事件过程： Private Sub Form_Click() a$= Microsoft Visual Basic b$=Right(a$，5) c$=Mid(a$，1，9) MsgBox a$，34，b$，c$，5 End Sub 程序运行后，单击窗体，则在弹出的信息框的标题栏中显示的信息是
A．Microsoft Visual
B．Microsoft
C．Basic
D．5
单项选择题
在窗体上画一个通用对话框，其名称为CommonDialog1，然后画一个命令按钮，并编写如下事件过程： Private Sub Command1_Click() CommonDialog1.Flags=vbOFNHideReadOnly CommonDialog1.Filter= All Files(*.*)|*.*|Text Files(*.txt)|*.txt CommonDialog1.FilterIndex=1 CommonDialog1.ShowOpen MsgBox CommonDialog1.FileName End Sub 程序运行后，单击命令按钮，将显示一个“打开”对话框，此时在“文件类型”框中显示的是
A．All Files(*.*)
B．Text Files(*.txt)
C．Batch Files(*.bat)
D．All Files(*.*)|Text Files(*.txt)
相关试题