首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
假设窗体上有一个通用对话框控件CD1,希望在执行下面程序时,打开如图所示的文件对话框: Private Sub Command1_Click() CD1.DialogTifle="打开文件" CD1.InitDir=
假设窗体上有一个通用对话框控件CD1,希望在执行下面程序时,打开如图所示的文件对话框: Private Sub Command1_Click() CD1.DialogTifle="打开文件" CD1.InitDir=
admin
2019-01-17
61
问题
假设窗体上有一个通用对话框控件CD1,希望在执行下面程序时,打开如图所示的文件对话框:
Private Sub Command1_Click()
CD1.DialogTifle="打开文件"
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.FiherIndex=3
D、把CD1.FileName:""改为CD1.FileName="文本文件"
答案
C
解析
在通用对话候控件中,Filter属性指定了在对话框中显示的文件类型,该属性可以设置多个文件类型,每种文件类型由文件描述和文件通配符与扩展名组成,并由“|”隔开。FilterIndex属性用来指定认的过滤器,Filter属性中设置了多个过滤器后,每个过滤器的对应的值按从左到右顺序是1、2…,FilterIndex属性默认为1,即—个过滤器,因此程序中会显示C:\下的所有文件。应该在通话框打开之前(CD1.Action=1之前)添加CD1.Filterlndex=3,即使默认过滤器为第3个过滤器。
转载请注明原文地址:https://kaotiyun.com/show/pcFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
判断单选按钮是否被选中的属性为()。
下列说法中,错误的是()。
命令按钮Command1的单击事件过程如下:PrivateSubCommand1_Click() Dima(10,10)AsInteger x=0 Fori=1To3 Forj=1To3 a(i,j
设有如下程序:OptionBase1Dima(3,4)AsInteger,b(4,3)AsIntegerPrivateSubCommand1_Click() ’循环1 Fori=1To3 Forj=1To4
VisualBasic控件一般都规定一个默认属性,在引用这样的属性时,只写对象名而不必给出属性名。默认属性为Caption的控件是( )。
设工程中有2个窗体:Form1和Form2,每个窗体上都有一个名称为Text1的文本框。若希望把Form1上文本框中的内容复制到Form2上的文本框中,应进行的操作是
有三个关系R、S和T如下:则由关系R和S得到关系T的操作是( )。
下面对对象概念描述正确的是
VisualBasic源程序的续行符为
对长度为n的线性表排序,在最坏情况下,比较次数不是n(n一1)/2的排序方法是
随机试题
为避免手术后乳腺癌复发,应指导患者避免妊娠的期限是
慢性肾功能衰竭最常见的病因为( )。
汇票出票人应该是信用证指定的受益人。()
根据以下资料回答题:我某对外工程承包公司于某年10月5日以电传请美国某供应商发盘出售钢材一批,我方在电传中声明:要求这一发盘是为了计算一项承造大楼的标价和确定是否参加投标之用。我方必须于10月18日向招标人递交投标书,招标人的开标日期为10月31日。
商业银行对于中长期授信,除了核实客户身份、财务状况等基本隋况外,还需要了解()。
教育能够把潜在劳动力转化为现实劳动力,体现了教育的()功能。
天山绵延几千里,无论高山、深谷,无论草原、森林,无论溪流、湖泊,处处有丰饶的物产,处处有______的美景。填入划线部分,最恰当的是()
静脉注射肾上腺素后不出现下列哪项生理效应
Thediscussionwassoprolongedandexhaustingthat______thespeakersstoppedforrefreshments.
Iftheylook_____,showthemtheevidence.
最新回复
(
0
)