在窗体上画一个通用对话框，其名称为CommonDialog1，然后画一个命令按钮，并编写如下事件过程：

Private Sub Command1_Click()
    CommonDialog1.Flags = cdlOFNHideReadOnly
    CommonDialog1.Filter = "All Files(*.*)|*.*|Text Files" & "(*.txt)|*.txt|Batch Files(*.bat)|*.bat"
    CommonDialog1.FilterIndex = 2
    CommonDialog1.ShowOpen
    MsgBox CommonDialog1.FileName
End Sub

程序运行后，单击命令按钮，将显示一个“打开”对话框，此时在“文件类型”框中显示的内容是什么？

    解：显示的内容是：Text Files(*.txt)

*****************************
新世纪计算机基础教育丛书 丛书主编：谭浩强
Visual Basic 程序设计教程 题解与上机指导（第四版） 刘炳文 编著

来源：visual basic程序设计教程第四版答案(刘炳文)

本文链接：http://www.wb98.com/vb1/post/vb_12.1.html