首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画1个名称为CD1的通用对话框,1个名称为Command1的命令按钮,编写如下Click事件过程: Click事件过程: Private Sub Command1_Click() CD1.FileName = "" CD1.Filter =
admin
2020-01-02
53
问题
在窗体上画1个名称为CD1的通用对话框,1个名称为Command1的命令按钮,编写如下Click事件过程:
Click事件过程:
Private Sub Command1_Click()
CD1.FileName = ""
CD1.Filter = "所有文件|*.*|所有jpg文件|*.jpg|所有bmp文件|*.bmp"
CD1.FilterIndex = 2
CD1.Action = 1
End Sub
关于以上代码,正确的叙述是( )。
选项
A、执行以上事件过程,可显示"打开"文件对话框
B、在出现的对话框中,显示的是所有扩展名为.bmp的文件
C、语句CD1.Action = 1可以等价地改成语句CD1.ShowSave
D、在出现的对话框中,显示的是所有扩展名为.bmp的文件
答案
A
解析
过程中的"CD1.Action=1"用来建立Open对话框,它与语句"CD1.ShowOpen"等价,故A选项正确,C选项错误;Filter属性用来指定在对话框中显示的文件类型,用该属性可以设置多个文件类型,供用户在对话框的"文件类型"的下拉列表中选择。FilterIndex属性用来指定默认的过滤器,其默认值为一整数。过程中的"CD1.FilterIndex = 2"语句用来指定将第二个过滤器作为默认显示的过滤器,所以在出现的对话框中,显示的是所有扩展名为.jpg的文件,故B选项错误;执行以上代码,只能打开选中的文件内容,并不能读取内容,故D选项错误。本题正确答案为A。
转载请注明原文地址:https://kaotiyun.com/show/jhTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
通用对话框Filter属性的作用是
如果一个顶级菜单项的访问键为D,则以下等同于单击该菜单项的操作为
设一棵满二叉树共有15个结点,则在该满二叉树中的叶子结点数为()。
下列程序段的执行结果为()。x=Int(Rnd+4)SelectCasexCase5:Print"AClass"Case4:Print"BClass"Case3:Print"CCla
已知数组Dima(1To10)AsInteger,则下面正确调用GetValue函数的是()。PrivateFunctionGetValue(a()AsInteger)AsIntegerFori=1
在窗体上有一个文本框Text1,Text属性值为空,然后编写如下事件过程:PrivateSubText1_KeyPress(KeyAsciiAsInteger)DimstrAsString,nAsInteger
单击命令按钮执行以下程序,则输出结果为()。PnvmeSubCommand1_Click()DimxAsInteger,yAsIntegerx=14:y=48:CallProc(x,y)Pri
E—R图中用来表示实体的图形是()。
产生100以内(不含100)2位随机整数的VisualBasic表达式是
对下列二叉树进行前序遍历的结果为()。
随机试题
参与心血管活动调节的体液因素有
下列可引起急性心力衰竭的疾病是
GMP规定,必须使用独立的厂房和设施,分装室应保持相对负压的药品是
招标人不得以任何方式限制或排斥本地区、本系统以外的法人或其他组织参加投标,体现_________原则。()
社会工作者开始撰写预估摘要最合适的时机是()
已知二叉树排序树中某结点指针p,其双亲结点指针为fp,p为fp的左孩子。试编写算法,删除p所指结点。
4名行人正常经过北方牧场时跌入粪坑,1人获救3人死亡。据查,当地牧民为养草放牧,储存牛羊粪便用于施肥,一家牧场往往挖有三四个粪坑,深者达三四米,之前也发生过同类事故。关于牧场的责任,下列哪些选项是正确的?()[2016年法考真题]
MySpaceandotherWebsiteshaveunleashedapotentnewphenomenonofsocialnetworkingincyberspace,【1】atthesametime,agr
一个从小练习芭蕾舞的女孩儿决定考舞蹈学院,并将跳舞作为终生职业。但她很想搞清楚自己是否有这个天分。于是,当一个芭蕾舞团来到女孩儿居住的城市演出时,她跑去见该团团长。女孩儿说:“我想成为最出色的芭蕾舞演员,但我不知道自己是否有这个天分。”“你跳一段
Whatisthepassagetalkingabout?______.
最新回复
(
0
)