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

admin2020-07-22  37

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

选项 A、Private Sub Dir1_Change()    File1.Path=Dir1.Path    End Sub    Private Sub Drive1_Change()    Dir1.Path=Drive1.Drive    Label1.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/NlS0FFFM
0

最新回复(0)