Public Class Form1
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
List.Sorting = SortOrder.Ascending
List.View = View.Details = TxtDir.Text
End Sub
Private Sub cmdQuit_Click(sender As Object, e As EventArgs) Handles cmdQuit.Click
Me.Close()
End Sub
Private Sub cmdDir_Click(sender As Object, e As EventArgs) Handles cmdDir.Click
FolderBrowserDialog1.ShowDialog()
TxtDir.Text = FolderBrowserDialog1.SelectedPath
End Sub
Private Sub ListView_SelectedIndexChanged(sender As Object, e As EventArgs) Handles List.SelectedIndexChanged
End Sub
Private Sub TxtDir_TextChanged(sender As Object, e As EventArgs) Handles TxtDir.TextChanged
End Sub
End Class
The text box that displays the directory is TxtDir, the directory select button is cmdDir and my ListView is called List.
Any help is appreciated
Thanks,
WhaleTrain
P.S I am a beginner in VB so that's probably why I'm not getting anywhere

New Topic/Question
Reply



MultiQuote





|