Add a button called Browse
Double-click on it and insert the following codes:
Dim OpenFile As New OpenFileDialog
OpenFile.Title = "Open"
OpenFile.Filter = "All Files|*.*"
OpenFile.ShowDialog()
TextBox1.Text = OpenFile.FileName
No comments:
Post a Comment