在设窗体上有一个通用对话框控件CD1,希望在执行下面程序时,打开如图所示的文件对话框:Private Sub Command1_Click() CD1.DialogTitle="打开文件" CD1.InitDir="C:" CD1.Filter="所有文件|*.*|Word文档|*.doc|文本文件|*.txt" CD1.FileName="" CD1.Action=1 If CD1.FileName=""Then Print"未打开文件" Else Print"要打开文件"& CD1.FileName End IfEnd Sub 但实际显示的对话框中列出了C:\下的所有文件和文件夹,"文件类型"一栏中显示的是"所有文件"。下面的修改方案中正确的是( )。