（ 29 ） 设窗体上有一个通用对话框控件 CD1 ， 希望在执行下面程序时 ， 打开如图所示的文件对话框Private Sub Comand1_Click （）CD1.DialogTitle= " 打开文件 "CD1.InitDir= " C:\ "CD1.Filter= " 所有文件 |*.*|Word 文档 |*.doc| 文本文件 |*.Txt "CD1.FileName= ""CD1.Action=1If CD1.FileName= "" ThenPrint " 未打开文件 "ElsePrint " 要打开文件 " CD1.FileNameEnd IfEnd Sub但实际显示的对话框中列出了 C:\ 下的所有文件和文件夹 ,“文件类型”一栏中显示的是“所有文件 ” 。下面的修改方案中正确的是A ）把 CD1.Action=1 改为 CD1.Action=2B ）把 “ CD1.Filter= ” 后面字符串中的 “ 所有文件 ” 改为 “ 文本文件 ”C ）在语句 CD1.Action=1 的前面添加： CD1.FilterIndex=3D ）把 CD1.FileName= "" 改为 CD1.FileName= " 文本文件 "
（ 29 ） 设窗体上有一个通用对话框控件 CD1 ， 希望在执行下面程序时 ， 打开如图所示的文件
对话框
Private Sub Comand1_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 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= " 文本文件 "
相关考题：
在窗体上有1个名为Cd1的通用对话框,为了在运行程序时打开保存文件对话框,则在程序总应使用的语句是（ ）。A．Cd1.Action=2B．Cd1.Action=1C．Cd1.ShowSave=TureD．Cd1.ShowSave=0
在窗体上有—今名为Cd1的通用对话框，为了在运行程序时打开保存文件对话框，则在程序中应使用的语句是______。A．Cd1.Action=2B．Cd1.Acfion=1C．Cd1.ShowSave=TrueD．Cd1.ShowSave=0
（ 21 ） 在窗体上有 1 个名为 Cd1 的通用对话框 , 为了在运行程序时打开保存文件对话框 , 则在程序总应使用的语句是（ ）A ） Cd1.Action=2B ） Cd1.Action=1C ） Cd1.ShowSave=TureD ） Cd1.ShowSave=0
设窗体上有一个通用对话框控件CD1，希望在执行下面程序时，打开如图所示的文件对话框Private Sub Command1_Click()CDl．DialogTitle=“打开文件”CDl．InitDir=“C：＼”CDl．Filter=“所有文件I**Iword文档I*docI文本文件I*txt”CDl．FileName=“”CDl．Action=1If CD1．FileName=””ThenPrint“未打开文件”ElsePrint“要打开文件”＆CDI．FileNameEnd IfEnd Sub但实际显示的对话框中列出了C：＼下的所有文件和文件夹，“文件类型”一栏中显示的足“所有文件”。下面的修改方案中正确的是A．把CDl．Action=1改为CDl．Action=2B．把“CD1．Filter=”后面字符串中的“所有文件”改为“文本文件”C．在语句CD1．Action=1的前面添加：CD1．FilterIndex=3D．把CD1．FileName=“”改为CD1．FileName=“文本文件”
设窗体j．有一个通用对话框控件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 If End Sub 但实际显示的对话框中列出了C．＼下的所有文件和文件夹，“文件类型”一栏中显示的是“所有文件”。下面的修改方案中正确的是（ ）。A.把CD1．Action=1改为CD1．Action=2B.把“CD1．Filter=”，后面字符串中的“所有文件”改为“文本文件”C.在语句CD1．Action=1的前面添加：CD1．FilterIndex=3D.把CD1．FileName=""改为CD1．FileName=”文本文件”
在窗体上有一个名称为CD1的通用对话框和一个名称为Comrnand1的命令按钮。要求单击命令按钮时，打开一个保存文件的通用对话框。该窗口的标题为“保存”，缺省文件名为“ABC”， 在“文件类型”栏中显示*．txt。则能够满足上述要求的稗序县（ ）。\
假设在窗体Form1上画一通用对话框控件CommonDialogl，要建立“打开文件”对话框，为了使得该对话框的标题显示为“打开文件”，那么可以实现该功能的语句是 ______。A．CommonDialogl.DialogTitle＝“打开文件”B．CommonDialogl.DialogTitle(“打开文件”)C．CommonDialogl.FileTitle＝“打开文件”D．Commonnalogl.FileTitle(“打开文件”)
设窗体j．有一个通用对话框控件CD1，希望在执行下面程序时，打开如图所示的文件对话框：Private Sub Command1=Click（ ）CD1．DialogTitle=打开文件CD1．InitDir=C：＼CD1．Filter=所有文件|*．*| Word文档|*．doc|文本文件|*．txt CD1．FileName=CD1．Action=1If CD1．FileName=ThenPrint未打开文件ElsePrint要打开文件 CD1．FileNameEnd IfEnd Sub但实际显示的对话框中列出了C．＼下的所有文件和文件夹，“文件类型”一栏中显示的是“所有文件”。下面的修改方案中正确的是（ ）。A.把CD1．Action=1改为CD1．Action=2B.把“CD1．Filter=”，后面字符串中的“所有文件”改为“文本文件”C.在语句CD1．Action=1的前面添加：CD1．FilterIndex=3D.把CD1．FileName=改为CD1．FileName=”文本文件”
假设在窗体Form1画一个通用对话框控件CommonDialogl，要建立“打开文件”对话框，为了使得该对话框的标题显示为“打开文件”，那么可以实现该功能的语句是 ______。A．CommonDialogl.DialogTile= "打开文件"B．CommonDialogl.DialogTile( "打开文件")C．CommonDialogl.FileTile="打开文件"D．CommonDialogl.FileTile("打开文件")