首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为Dir1的目录列表框,一个名称为File1的文件列表框。当改变当前目录时,文件列表框中同步显示目录列表框中当前被打开目录中的文件,则所使用的事件过程是( )。
在窗体上画一个名称为Dir1的目录列表框,一个名称为File1的文件列表框。当改变当前目录时,文件列表框中同步显示目录列表框中当前被打开目录中的文件,则所使用的事件过程是( )。
admin
2018-06-20
50
问题
在窗体上画一个名称为Dir1的目录列表框,一个名称为File1的文件列表框。当改变当前目录时,文件列表框中同步显示目录列表框中当前被打开目录中的文件,则所使用的事件过程是( )。
选项
A、Private Sub Dir1_Change()
File1.Path=Dir1.Path
End Sub
B、Private Sub Dir1_Change()
File1.Path=Dir1.Drive
End Sub
C、Private Sub Dir1_Change()
Dir1.Path=File1.Path
End Sub
D、Private Sub Dir1_Change()
File1.Drive=Dir1.Path
End Sub
答案
A
解析
在实际应用中,驱动器列表框、目录列表框和文件列表框往往需要同步操作,这可以通过Path属性的改变引发Change事件来实现,A选项的事件过程使窗体上的目录列表框Dir1和文件列表框File1产生同步。因为目录列表框Path属性的改变将产生Change事件,所以在Duir1_Change事件过程中,把Dir1.Path赋给File1.Path,就可以产生同步效果。故本题A选项符合题意。本题选择A选项。
转载请注明原文地址:https://kaotiyun.com/show/aiGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下表达式与Int(3.5)的值相同的是
设窗体上有1个水平滚动条,已经通过属性窗口把它的Max属性设置为1,Min属性设置为100。下面叙述中正确的是
下列可以打开立即窗口的操作是()。
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Forml的窗体上画出包含三个命令按钮的控件数组,名称为cmdl,下标分别为0、1、2,Caption分别为“开始”、“停止”和“退出”,如图3(a)所示
下列哪一条小属于数据库设计的任务?()
数列1,1,3,5,9,15,25,41,…,的规律是从第三个数开始,每个数是它前面两个数的和加1。在考生目录下有一个工程文件sjt5.vbp。窗体中已经给出了所有控件,如图2-99所示。请编写适当的事件过程实现以下功能:在Textl中输入整数40,单击”
执行语句DimX,YAsInteger后,()。
在窗体上画一个通用对话框,程序运行中用ShowOpen方法显示“打开”对话框时,希望在该对话框的“文件类型”栏中只显示扩展名为DOC的文件,则在设计阶段应把通用对话框的Filter属性设置为
能够产生1到50之间(含1和50)随机整数的表达式是
随机试题
中国共产党独立领导革命战争、创建人民军队的开端是()
设立出版物出租单位或者其他单位、个人从事出版物出租业务的,应当于取得营业执照后10日内持营业执照复印件及经营地址、法定代表人或者主要负责人情况等材料到当地县级人民政府文化部门备案。()
猪新鲜精液液态保存的适宜温度为()
下列各项中不对的是
下列叙述中错误的是()。
甲厂委托职工张某到深圳购买一批仪器,由于委托书中未写明具体规格,导致张某买到的仪器不符合要求,此时价款还未支付。根据相关规定,下列说法正确的有()。
公元前334年,亚历山大第一次在地球上画出了一条纬线,这条线从直布罗陀海峡起,沿着托鲁斯和喜马拉雅山脉一直到()。
阅读材料,回答下列问题。2020年1—2月,我国境内投资者共对全球147个国家和地区的1733家境外企业进行了非金融类直接投资,累计实现投资1078.6亿元人民币,同比增长1.8%。对外承包工程完成营业额1080亿元人民币,同比下降9.5%,新签
阅读以下说明,回答问题1~问题3,将解答填入答题纸对应的解答栏内。[说明]假设某公司被分配了一个C类地址,网络号是202.128.236.0,该公司的网络拓扑结构如下图所示。其中部门A和部门B拥有的主机数不会超过25台,其他部门及分公司的主机
BirdFlu:CommunicatingtheRiskTherecommendationslistedbelowaregroundedintwoconvictions(信念):thatmotivatingpeopl
最新回复
(
0
)