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

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

Private Sub Command1_Click()

CommonDialog1.Flags=vbOFNHideReadOnly

CommonDialog1.Filter="All Files(*.*)|*.*|Text Files(*.txt)|*.txt

CommonDialog1.FiherIndex=1

CommonDialog1.ShowOpen

MsgBox CommonDialog1.FileName

End Sub

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

A．All Files(*.*)

B．Text Files(*.*)

C．*.txt

D．All Files(*.*)|Text Files(*.*)

A解析：通用对话框控件的CommonDialog1的Filter属性用来指定在对话框中显示的文件类型。利用该属性可以设置多个文件类型，供用户在对话框的“文件类型”的下拉列表中选择。Filter的属性值由一对或多对文本字符串组成，每对字符串用管道符“1”隔开，在管道符“|”前面的部分称为描述，后面的部分一般为通配符和文件扩展名，称为“过滤器”。如“*.txt”等，各对字符串之间也用管道符隔开。其格式如下：[窗体.]对话框名.Filter="描述符1|过滤器1|描述符2|过滤器2……"如果省略窗体，则为当