首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为Drive1的驱动器列表框,一个名称为Dir1的目录列表框,一个名称为File1的文件列表框,两个名称分虽为Lahel1、Label2,标题分别为空白和 "共有文件"的标签。编写程序,使得驱动器列表框与目录列表框、目录列表框与文件列表框
在窗体上画一个名称为Drive1的驱动器列表框,一个名称为Dir1的目录列表框,一个名称为File1的文件列表框,两个名称分虽为Lahel1、Label2,标题分别为空白和 "共有文件"的标签。编写程序,使得驱动器列表框与目录列表框、目录列表框与文件列表框
admin
2013-01-23
53
问题
在窗体上画一个名称为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全国计算机二级
相关试题推荐
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()Dimm(10)AsIntegerDimb(3)AsInteger
在窗体上有若干控件,其中有一个名称为,Text1的文本框。影响Text1的Tab顺序的属性是________。
VisualBasic中工程文件的扩展名是()。
以下能够触发文本框Change事件的操作是
下列关于结构化设计方法的特点描述中,不正确的是()。
在窗体上画—个文本框、一个标签和一个命令按钮,其名称分别为Text1、Label1和Command1,然后编写如下两个事件过程:PrivatesubCommand1_Click()strText=lnpu
索引属于______。
在深度为5的满二叉树中,叶子结点的个数为______。
表达式Abs(-5)+Len("ABCDE")的值是______。
判断是否到达文件尾和返回文件字节数的函数是______。EOFEND
随机试题
心肌顿抑
国家与人民群众联系的纽带是()
Intheearly1960sWiltChamberlainwasoneofonlythreeplayersintheNationalBasketballAssociation(NBA)listedatoverse
显微镜下多血管炎(MPA)主要累及小血管包括
A.炭疽B.猪气喘病C.流行性型脑炎D.传染性法氏囊病E.鸡产蛋下降综合征可以经土壤传播的传染病是()。
租赁设备的窝工费,一般按()计算。
按CIFSingapore条件成交出口大宗商品,程租船运输,卖方欲不负担卸货费,应采用()。
被评估企业甲公司在评估基准日前4年以300万元设备投资于乙公司,该项投资占公司总股本的30%,双方约定合营期为10年,合营期满,甲公司收回用于投资的设备的可变现价值。经调查,乙公司的生产经营一直较为稳定,甲公司该项投资前4年的每年收益率都保持在20%,评估
虚拟存储技术是()。
被蚊子叮咬后,涂肥皂水可以止痒,其化学原理是()。
最新回复
(
0
)