[RESOLVED] DriveListBoxes and DirListBoxes

Can anyone tell me how i can link a DirListBox with a DriveListBox so that when you change the DriveListBox the DirListBox automaticaly changes as well so that it shows the directoies in the new selected drive.

Code:

---

Private Sub Form_Load()
Drive1.Drive = "C:"
End Sub

Private Sub Drive1_Change()
Dir1.Path = Drive1.Drive
End Sub

Private Sub Dir1_Change()
File1.Path = Dir1.Path
End Sub

---

thank you