在窗体上画一个名称为Drive1的驱动器列表框,一个名称为Dir1的目录列表框,一个名称为File1的文件列表框,两个名称分别为Label1、Label2,标题分别为空白和“共有文件”的标签。编写程序,使得驱动器列表框与目录列表框、目录列表框与文件列表框同步变化,并且在标签kabel1中显示当前文件夹中文件的数量,如图所示。 能够正确实现上述功能的程序是
A.Private Sub Dir1_Change( ) Filc1.Path=Dir1.Path End Sub Private Sub Drive1_Change( ) Dir1.Path=Drive1.DriveLabel1.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 SubPrivate 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.ListEnd Sub
参考答案:C
解析: List属性用来列出表项的内容,可以加下标用“( )”括起来配合使用。根据题意,应选择文件列表框的ListCount属性,该属性用于返回文件的数量值。故B、D项错误。A项缺少“Label1.Caption=File1.ListCount”这一语句,从而使得在仅触动Dir1的Change事件时,Label1l没有反应。