Private Sub Command1_Click()
C.ommonDialog1.Filter = "All Files (*.*)|*.*|Text Files" & _
"(*.txt)|*.txt| Executable Files(*.exe)|*.exe"
C.ommonDialog1.FilterIndex = 3
C.ommonDialog1.ShowOpen
MsgBox CommonDialog1.FileName
E.nd Sub
程序运行后,单击命令按钮,将显示一个 “ 打开 ” 对话框,此时在 “ 文件类型 ” 框中显示的是
A. ) All Files(*.*)
B. ) Text Files(*.txt)
C. ) Executable Files(*.exe)
D. ) 不确定