单选题
设窗体上有一个通用对话框控件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
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
【答案解析】[解析] 在通用对话框控件中，Filter属性指定了在对话框中显示的文件类型，该属性可以设置多个文件类型，每种文件类型由文件描述和文件通配符与扩展名组成，并由“|”隔开。FilterIndex属性用来指定默认的过滤器，Filter属性中设置了多个过滤器后，每个过滤器的对应的值按从左到右顺序是1、2…，FilterIndex属性默认为1，即第一个过滤器，因此程序中会显示C: /下的所有文件。应该在通话框打开之前(CD1. Action=1之前)添加CD1. FilterIndex=3，即使默认过滤器为第3个过滤器。