在窗体上有一个名称为Drive1的驱动器列表框,一个名称为Dir1的目录列表框,一个名称为File1的文件列表框,两个名称分别为Label1、Label2的标签(标题分别为空白和“共有文件”)。要使得驱动器列表框与目录列表框、目录列表框与文件列表框同步变化

admin2017-03-26  41

问题 在窗体上有一个名称为Drive1的驱动器列表框,一个名称为Dir1的目录列表框,一个名称为File1的文件列表框,两个名称分别为Label1、Label2的标签(标题分别为空白和“共有文件”)。要使得驱动器列表框与目录列表框、目录列表框与文件列表框同步变化,并且在标签Label1中显示当前文件夹中文件的数量。下列能够正确实现上述功能的程序是(    )。

选项 A、Private Sub Dir1_Change()
File1.Path=Dir1.Path
End Sub
Private Sub Drive1_Change()
Dir1.Path=Drive1.Drive
Labe1.Caption=File1.ListCount
End Sub
B、Private Sub Dir1_Change()
File1.Path=Dir1.Path
End Sub
Private SUb Drive1_Change()
Dir1.Path=Drive1.Drive
Label1.Caption=File1.List
End Sub
C、Private Sub Dir1_Change()
File1.Path=Dir1.Path
Label1.Caption=File1.ListCount
End SUb
Private SUb Drive1_Change()
Dir1.Path=Drive1.Drive
Label1.Caption=File1.ListCount
End Sub
D、Private Sub Dir1_Change()
File1.Path=Dir1.Path
Label1.Caption=File1.List
End Sub
Private Sub Drive1_Change()
Dir1.Path=Drive1.Drive
Label1.Caption=File1.List
End Sub

答案C

解析 本题考查文件系统控件。要使驱动器、目录和文件列表框同步显示,那么就需要编写代码才能使它们之间彼此同步,在驱动器Drivel的Change事件中,要Dir1.Path=Drive1.Drive,使目录的路径和驱动器一致,同时在目录Dir1的Change事件中要File1.Path=Dir1.Path,使文件路径的位置和驱动器一致。可以在文件列表框中使用ListCount属性来统计文件数目(当文件路径改变时统计)。
转载请注明原文地址:https://jikaoti.com/ti/3qy0FFFM
0

最新回复(0)