用DriverListBox，DirListBox和FileListBox如何知道是在根目錄還(編號：1612)

Private Sub Drive1_Change()
Dir1.Path = Drive1.Drive
End Sub
Private Sub Dir1_Change()
File1.Path = Dir1.Path
End Sub
取得File1.Path，可能讀出C:\ or C:\My Folder，請問如何用程式碼判斷File1.Path在根目錄還是子目錄下？