在窗体上画一个通用对话框，其名称为CommonDialogl，然后画一个命令按钮，并编写如 下事件过程： Private Sub Commandl_Click() CommonDialogl，Flags=vbOFNHideReadOnly CommontDialogl．Filter="All Files(*．*)|*．*|Text Files (*.*)|*．txt|"_ & Batch Files (*．bat) |*．bat" CommonDialogl．Filterlndex=1 CommonDialogl．Showopen MsgBox CommonDialogl．FileName End Sub 程序运行后，单击命令按钮，将显示一个“打开”对话框，此时在“文件类型”框中显示的是()。
A．All Fries(*.*)
B．Text Files(*.*)
C．Batch Files(*．bat)
D．All Files (*．*)|Text Files(*．*)
参考答案：A
解析：通用对话框控件的CommonDialogl的Filter属性用来指定在对话框中显 示的文件类型。利用该属性可以设置多个文件类型，供用户在对话框的“文件类型”的下 拉列表中选择。Filter的属性值由一对或多对文本字符串组成，每对字符串用管道符“|” 隔开，在管道符“|”前面的部分称为描述，后面的部分一般为通配符和文件扩展名，称为 “过滤器”。如“*．txt"等，各对字符串之间也用管道符隔开。其格式如下： [窗体．]对话框名．Filter=”描述符1|过滤器1|描述符2|过滤器2……” 如果省略窗体，则为当前窗体。本题执行语句后，可以在文件类型栏内通过下拉列 表选择要显示的文件类型，而最初默认显示的文件类型(过滤器)可以由Filterlndex属性 来指定，该属性是一个整数。用Filter属性设置多个过滤器后，每个过滤器都有一个值， 第一个过滤器的值为1，第二个过滤器的值为2……，用Filterlndex属性可以指定作为默 认显示的过滤器，本题中的值是1，所以显示All Files(*.*)。