发表于:2004/12/23 22:09:00
楼主
我想把FILE1设置为DIR1所指的文件夹里的文件预览
现在DRIVEL1 和DIR1 正常 就是FILE1不能正常显示
Private Sub Dir1_Change()
Drive1.Drive = Dir1.Path
End Sub
Private Sub Drive1_Change()
Dir1.Path = Drive1.Drive
End Sub
Private Sub File1_Click()
Dir1.Path = File1.List
End Sub
现在DRIVEL1 和DIR1 正常 就是FILE1不能正常显示
Private Sub Dir1_Change()
Drive1.Drive = Dir1.Path
End Sub
Private Sub Drive1_Change()
Dir1.Path = Drive1.Drive
End Sub
Private Sub File1_Click()
Dir1.Path = File1.List
End Sub