单项选择题

下面程序段执行结果为

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 Command1_Click() For i=1 To 4 x=4 For j=1 To 2 x=x+6 Next Next Print x End Sub 程序运行后,单击命令按钮,输出结果是
A.12
B.13
C.16
D.17
单项选择题
在窗体上画一个通用对话框,其名称为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)
相关试题
  • 有如下程序: Private Sub Command1_C...