·vb怎么加驱动器目录框 目录列表 文件列表框等控件啊 十万火急!!!
添加工具箱中的drivelistbox,dirlistbox和filelistbox控件,并写以下代码
Private Sub Drive1_Change()
Dir1.Path = Drive1.Drive ' 当驱动器改变时,设置目录路径.
End Sub
Private Sub Dir1_Change()
File1.Path = Dir1.Path ' 当目录改变时,设置文件路径.
End Sub
添加工具箱中的drivelistbox,dirlistbox和filelistbox控件,并写以下代码
Private Sub Drive1_Change()
Dir1.Path = Drive1.Drive ' 当驱动器改变时,设置目录路径.
End Sub
Private Sub Dir1_Change()
File1.Path = Dir1.Path ' 当目录改变时,设置文件路径.
End Sub