设窗体上有一个通用对话框控件CD1，希望在执行下面程序时，打开如图所示的文件对话框：
Private Sub Command1_Click()
CD1. DialogTitle = "打开文件"
CD1. InitDir = "C: "
CD1. Filter = "所有文件| *. * |Word文档| *. doc |文本文件| *. txt"
CD1. FileName = " "
CD1. Action = 1
If CD1. FiteName = " " Then
Print"未打开文件"
Else
Print"要打开文件" & CD1. FileName
End If
End Sub
但实际显示的对话框中列出了C: \下的所有文件和文件夹，“文件类型”一栏中显示的是“所有文件”。下面的修改方案中正确的是( )。
A) 把CD1. Action=1改为CD1. Action=2
B) 把 "CD1. Filter=" 后面字符串中的 "所有文件" 改为 "文本文件"
C) 在语句CD1. Action=1的前面添加：CD1. FilterIndex=3
D) 把CD1. FileName=" " 改为CD1. FileName="文本文件\
参考答案：C
解析： 在通用对话框控件中，Filter属性指定了在对话框中显示的文件类型，该属性可以设置多个文件类型，每种文件类型由文件描述和文件通配符与扩展名组成，并由“|”隔开。FilterIndex属性用来指定默认的过滤器，Filter属性中设置了多个过滤器后，每个过滤器的对应的值按从左到右顺序是1、2…，FilterIndex属性默认为1，即第一个过滤器，因此程序中会显示C: \下的所有文件。应该在通话框打开之前(CD1. Action=1之前)添加CD1. FilterIndex=3，即使默认过滤器为第3个过滤器。