博科:技院 三种列表框的同步 Hmc 选择驱动器时,目录列表框跟着改变 Private Sub Drivel_Changeo Dir 1, Path Drive1, Drive OHO End sub 选择目录时,文件列表框跟着改变 Private Sub Dir1_Changeo 程序设计 File 1, Path Dir 1, path End sub 心□ ■ Visual BASIC 程 序 设 计 万 博 科 技 职 业 学 院 Wanbo Inst. Of Since & Tech. 三种列表框的同步 '选择驱动器时，目录列表框跟着改变 Private Sub Drive1_Change() Dir1.Path = Drive1.Drive End Sub '选择目录时，文件列表框跟着改变 Private Sub Dir1_Change() File1.Path = Dir1.Path End Sub