首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为Drive1的驱动器列表框,一个名称为Dir1的目录列表框,一个名称为File1的文件列表框,两个名称分虽为Lahel1、Label2,标题分别为空白和 "共有文件"的标签。编写程序,使得驱动器列表框与目录列表框、目录列表框与文件列表框
在窗体上画一个名称为Drive1的驱动器列表框,一个名称为Dir1的目录列表框,一个名称为File1的文件列表框,两个名称分虽为Lahel1、Label2,标题分别为空白和 "共有文件"的标签。编写程序,使得驱动器列表框与目录列表框、目录列表框与文件列表框
admin
2013-01-23
60
问题
在窗体上画一个名称为Drive1的驱动器列表框,一个名称为Dir1的目录列表框,一个名称为File1的文件列表框,两个名称分虽为Lahel1、Label2,标题分别为空白和 "共有文件"的标签。编写程序,使得驱动器列表框与目录列表框、目录列表框与文件列表框同步变化,并且在标签Label1中显示当前文件夹中文件的数量。如图所示。
能够正确实现上述功能的程序是
选项
A、Private Sub Dir1_Change( ) Filet.Path=Dir1.Path End Sub Private Sub Dive1_Change( ) Dir1.Path=Drive1.Drive Label1,Caption=File1 ListCount End Sub
B、Private Sub Dir1_Change( ) File.Path=Dtr1.Path End Sub privage Sub Dive1_Change( ) Dir1.path=Drive1.Drive Lahel1.Caption=File1.List End Sub
C、Private Sub Dir1_Change( ) File1. Path = Dirl.Path Label1.Caption=File1, ListCount End Sub Private Sub Drive1_Change( ) Dir1.Path = Drive1. Drive Label1.Captiol1 = File1.ListCount End Sub(
D、Private Sub Dir1_Change( ) Filel. Path = Dirl.Path Label1.Caption = File1.ListCount End Sub Private Sub Dive1_Change( ) Dir1.Path = Drive1.Drive Label1.Caption = File1.List End Sub
答案
4
解析
驱动器列表框、目录列表框、文件列表框之间可以通过Path属性相互联系。如在驱动器列表框的Change事件占加入代码Dirl.Path=Drivel.Drive,在目录列表框的Change事件中加入代码Filel.Path=Dirl.Path。要在标签中显示当前文件夹中的文件数量应该在目录列表框的Change事件中加入代码Labell.Caption=Filel.ListCount,其中显示当前文件夹中的文件数量应该使用文件列表框的ListCount属性,而不是List属性。
转载请注明原文地址:https://kaotiyun.com/show/K5hp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
编写如下事件过程:OptionExplicitPrivateSubForm_Click()DimStrAsString,IAsIntegerOpen"examp"ForOutputA
编写如下事件过程:OptionBase1PrivateSubFormClick()Dimx1()AsIntegerDimiAsIntegerDimsA
程序代码如下,当单击窗体上的Command1控件时,在窗体上输出的结果是()。PrivateSubCommand1_Click()Dimaa(3,3)AsIntegerDimiAsInteger,jAsIn
下列4个表达式中,其中一个值与其他3个大小不同的是
下列程序实现的功能是:当在窗体上单击时,把C盘根目录下的文件a1.txt复制到D盘,并取名为a2,txt。PrivateSubForm_Click()DimChAsStringOpen"c:\a1.txt"
下面叙述正确的是
一个模块被多个模块调用,调用这个模块的模块个数称为【】。
下列说法中,不属于数据模型所描述的内容的是______。
设A="12345678",则表达式Val(Len(A,4)+Mid(A,4,2))的值为______。
索引属于()。
随机试题
(2010年真题)2007年12月31日,甲被人打伤,但直至2008年4月30日,甲才得知凶手是乙。2008年12月5日至2008年12月14日,甲因所在地发生地震,无法与外界联系。甲向人民法院起诉不丧失胜诉权的最后日期是
金银花与连翘配伍应用属于
张某与李某签订了一份自行车买卖合同,但在张某交付自行车时,李某却下落不明,张某尝试了各种途径仍联系不到李某。无奈之下,张某将自行车向有关部门进行提存。根据债权法律制度的规定,下列表述不符合法律规定的是()。
下列选项中,不是期货期权的是()。
结合实例分析班主任如何了解学生。
下列属于规范性公文正本特殊形式的是()。
南美洲原始森林里有一种翠波鸟,它体长不过五六厘米,可它们建造的巢穴却比自己身体大几倍,有的甚至是十几倍。这种鸟攀比心理太强,容不得别人的房子比自己的大,每当发现别的鸟新建“房子”,它便忙碌不停地扩建巢穴。最终把自己给累死了。翠波鸟因为攀比害了自己,谈谈对你
AlfredMuller’swordsimply______.WhichofthefollowingmeasuresCANNOTbetakenforgoodofpublichealth?
Therearefewpeoplewhodrawuplifegoals.Mostpeoplewanttotakeonestepatatime,andarefrightenedwhentheyhaveto
A、 B、 C、 C
最新回复
(
0
)