2. 计算机
  3. 在窗体上画一个名称为Drive1的驱动器列表框，一个名称为Dir1的目录列表框，一个名称为File1的文件列表框，两个名称分虽为Lahel1、Label2，标题分别为空白和 "共有文件"的标签。编写程序，使得驱动器列表框与目录列表框、目录列表框与文件列表框

在窗体上画一个名称为Drive1的驱动器列表框，一个名称为Dir1的目录列表框，一个名称为File1的文件列表框，两个名称分虽为Lahel1、Label2，标题分别为空白和 "共有文件"的标签。编写程序，使得驱动器列表框与目录列表框、目录列表框与文件列表框

admin2013-01-23  75
问题 在窗体上画一个名称为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全国计算机二级

相关试题推荐
随机试题
最新回复(0)