首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在设窗体上有一个通用对话框控件CD1,希望在执行下面程序时,打开如图所示的文件对话框: Private Sub Command1_Click() CD1.DialogTitle="打开文件" CD1.InitDir="C:" CD1.Fil
在设窗体上有一个通用对话框控件CD1,希望在执行下面程序时,打开如图所示的文件对话框: Private Sub Command1_Click() CD1.DialogTitle="打开文件" CD1.InitDir="C:" CD1.Fil
admin
2019-03-14
72
问题
在设窗体上有一个通用对话框控件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://www.kaotiyun.com/show/qIUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
有下面的程序段:x=InputBox(“字符串”,“输入”,“请输入”)Printx如果执行上面程序段时没有从键盘输入任何内容就直接按了回车键,则输出内容是
在窗体上画1个命令按钮,并编写如下事件过程:PrivateSubCommand1_Click()Dima(3,3)FOrm=1To3Forn=1To3Ifn=mOrn=4-mThena(m,n)=m+nElsea
以下程序段的功能是()。x=8.6y=Int(x+0.5)Printy
在名称为Forml的窗体上画一个名称为Imagel的图像框,其高、宽分别为2000、3000,且不随图片大小而变化;再画两个命令按钮,标题分别是“显示图片”和“隐藏图片”,名称分别为Cmdl、Cmd2,如图5所示。需编写两个命令按钮的Click事件过程,使
下列循环能正常结束的是()。
下列选项中不属于面向对象程序设计特征的是
下列叙述中正确的是
数据的存储结构是指
在设计阶段,假定在图片框Picturel中装入了一个图形,为了删除该图片框控件,应采用的正确操作是
一间宿舍可住多个学生,则实体宿舍和学生之间的联系是
随机试题
当代中国的行政决策主要包括()
直肠癌最主要的转移途径
患者,女,37岁。心悸失眠,虚烦神疲,梦遗健忘,手足心热,口舌生疮,舌红少苔,脉细数,宜选
A.苯妥英钠B.乙琥胺C.卡马西平D.促肾上腺皮质激素E.丙戊酸钠
甲、乙、丙三人成立一普通合伙企业,总资本10万元,成立时甲投入一台机器,价值2万元,现金2万元。经营3年后,该合伙企业对外欠债11万元。现甲提出退伙,那么下列说法正确的是哪些?()
公积金个人住房贷款实行()的原则。
工作分析是通过系统的分析方法来确定()的过程。
国家发改委会同工业和信息化部、农业部、商务部等16个部门共同制定《降低流通费用提高流通效率综合工作方案》,进一步降低企业流通费用,提高流通效率。降低流通费用会:
社会性处罚:指存在失信行为的人员所受到的与自身失信行为没有直接关联的来自其他部门的限制和处罚。下列属于社会性处罚的是
洪水
最新回复
(
0
)