Private Sub DirListBox1_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles DirListBox1.DoubleClick Try Microsoft.VisualBasic.ChDir(DirListBox1.Path) FileListBox1.Path = DirListBox1.Path Catch ex As System.Exception MsgBox(ex.ToString)