单项选择题

在窗体上画一个通用对话框，其名称为CommonDialog1，然后画一个命令按钮，并编写如下事件过程：
Private Sub Command1_Click()
CommonDialog1.Flags:vbOFNHideReadOnly
CommonDialog1.Filter: "All Files(*.*)|*.*|Text Files1*.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 Text1_KeyDown(KeyCode As Integer, Shift As Integer) Const Alt=4 Const Key_F2=&H71 altdown%=(Shift And Alt)＞0 t2down%=(KeyCode:Key_F2) If altdown% And f2down% Then Text1.Text= BBBBB End If End Sub 上述程序运行后，如果按Shift+F2键，则在文本框中显示的是( )。
A) Alt+F2
B) BBBBB
C) 随机出几个数
D) 文本框内容无变化
单项选择题
执行下列程序后，鼠标单击窗体，输出结果为( )。 Private Sub Form_Click() Print Click ; End Sub Private Sub Form_MouseDown(Button As Integer, Shift
As Integer,X As Single,Y As Single)
Print "Down"
End Sub
Private Sub Form_MouseUp(Button As Integer, Shift_As Integer,X As Single,Y As Single)
Print "Up"
End SubA) DownUpClick
B) ClickDownUp
C) DownClickUp
D) UpDownClick
相关试题