2. 计算机
  3. 设窗体上有一个通用对话框控件CDI，希望在执行下面程序时，打开如图所示的文件对话框： Private Sub Commandl＿ Click() CDl．DialogTitle=“打开文件” CDl．InitDir=“C：”

设窗体上有一个通用对话框控件CDI，希望在执行下面程序时，打开如图所示的文件对话框： Private Sub Commandl＿ Click() CDl．DialogTitle=“打开文件” CDl．InitDir=“C：”

admin2020-07-22  74
问题 设窗体上有一个通用对话框控件CDI，希望在执行下面程序时，打开如图所示的文件对话框：
    Private Sub Commandl＿ Click()
    CDl．DialogTitle=“打开文件”
    CDl．InitDir=“C：”
    CDl．Filter=“所有文件I*.* ｜Word文档｜*．doc ｜文本文件｜*．txt”
    CDl．FileName=“”
    CDl．Action=1
    If CDl．FileName=“”Then
          Print“未打开文件”
    Else
          Print“要打开文件”&CDl．FileName
    End If
End Sub

    但实际显示的的对话框列出了C：＼下的所有的文件盒文件夹，“义件类型”一栏中显示的是“所有文件”。下面的改正方案中正确的是(     )
选项 A、把CD1．Actioll=l改为CD1．Action=2
B、把”CDI．Filter＝”后面字符串中的“所有文件”改为“文本文件”
C、在语句CD1．Actiom=1的前面添加：CDI．Filterlndex=3
D、把CDI．FileName＝“”改为CDI．FileName=“文本文件”
答案C
解析 在通用对话框控件中，Filter属性指定了在对话框中显示的文件类型，该属性可以设置多个文件类型，每种文件类型由文件描述和文件通配符与扩展名组成，并由“｜”隔开。FilterIndex属性用来指定默认的过滤器，Filter属性中设置了多个过滤器后，每个过滤器的对应的能按从左到右顺序是1、2…，Fiherlndex属性默认为l，即第一个过滤器，因此程序中会显示：C＼下的所有文件。应该在通活框打开之前(CDl．Action=1之前)添加CDl．FliterIndex=3，即使默认过滤器为第3个过滤器。
转载请注明原文地址:https://kaotiyun.com/show/cJHp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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