大神速度戳进,大事不好了！

我是二楼哥

如题,刚写的简单代码,想做一个指定路径的框框。
为毛 怎么改变Ｃ　Ｄ　Ｅ　Ｆ　盘，下面总是显示Ｃ盘？

Private Sub Dir1_Change()File1.Path = Dir1.PathEnd Sub
Private Sub Drive1_Change()Dir1.Path = Dir1.PathEnd Sub

就是指定选择（１）下的　Ｃ　Ｄ　Ｅ　盘时
对应的（２）下的子文档显示对应的列表
（３）下的是显示对应（２）的某一特定文件

有大神知道没？代码有错？！求指导＿