设窗体上有一个通用对话框控件CD1,希望在执行下面程序时,打开如图所示的文件对话框 Private Sub Commandq Click() CD1.DialogTitle=“打开文件” CD1.InitDit="C:\" CDl.Filte

admin2017-11-23  29

问题 设窗体上有一个通用对话框控件CD1,希望在执行下面程序时,打开如图所示的文件对话框

Private Sub Commandq Click()
  CD1.DialogTitle=“打开文件”
  CD1.InitDit="C:\"
  CDl.Filter=”所有文件|*.*|Word文档
    |*.doc|文本文件|*txt”
    CD1.Action=1
    If CD1.FileName="’Then
        Print”未打开文件”
    Else
        Print”要打开文件”&
CD1.FileName
    End If
End Sub
    但实际显示的对话框中列出了C:\下的所有文件个文件夹,“文件类型”一栏中显示的是“所有文件”。下面的修改方案中正确的是

选项 A、把CD1.Action=1改为CD1.Action=1
B、把“CD1.Filter=”后面字符串中的“所有文件”改为“文本文件”
C、在语句CD1.Action=1的前面添加:CD1.Filterlndex=3
D、把CD1.FileName=""改为CD1.FileName=“文本文件”

答案C

解析 本题考查通用对话框。选项A)把Action属性改成2,表示通用对话框为“另存为”对话框,显然和题目要求的“打开文件”对话框不符;选项B)中“所有文件”和“*.*”是配对的,修改“所有文件”仅仅是修改描述,错误;选项C)正确,FilterIndex表示哪个文件类型是默认类型,Filtedndex为3表示“文本文件|*txt”是默认文件类型;选项D)中的FileName属性用于设置或得到用户所选定的文件名。
转载请注明原文地址:https://jikaoti.com/ti/7hy0FFFM
0

最新回复(0)