VB6.0中 怎样把DriveList和DirList还有FileList 合成一个下拉列表 就是点一个驱动目录 下面可以显示所有子目录 点子目录还可以显示文件~
添加一个drivelist,一个Dirlist,一个Filelist
然后添加如下代码
Private Sub Dir1_Change()
File1.Path = Dir1.Path
End Sub
Private Sub Drive1_Change()
Dir1.Path = Drive1.Drive
End Sub
然后添加如下代码
Private Sub Dir1_Change()
File1.Path = Dir1.Path
End Sub
Private Sub Drive1_Change()
Dir1.Path = Drive1.Drive
End Sub
温馨提示:答案为网友推荐,仅供参考