2. 计算机
  3. 在设窗体上有一个通用对话框控件CD1，希望在执行下面程序时，打开如图所示的文件对话框： Private Sub Command1_Click() 　　CD1.DialogTitle＝"打开文件" 　　CD1.InitDir＝"C：" 　　CD1.Filte

在设窗体上有一个通用对话框控件CD1，希望在执行下面程序时，打开如图所示的文件对话框： Private Sub Command1_Click() 　　CD1.DialogTitle＝"打开文件" 　　CD1.InitDir＝"C：" 　　CD1.Filte

admin2019-03-14  75
问题 在设窗体上有一个通用对话框控件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＝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个过滤器。
转载请注明原文地址:https://kaotiyun.com/show/IdFp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)