OpenFileDialog (Vb.Net)

Private Sub btnFilePathBrowse_Click_
(ByVal sender As System.Object, ByVal e As System.EventArgs)_
Handles btnFilePathBrowse.Click

      
   ofdFilePath.Title = "Please Select a File"

        ofdFilePath.FileName = ""

        ofdFilePath.InitialDirectory = "C:"

        ofdFilePath.ShowDialog()

End Sub

Private Sub ofdFilePath_FileOk_
(ByVal sender As System.Object, ByVal e As _
System.ComponentModel.CancelEventArgs) Handles ofdFilePath.FileOk

    
Dim sioStream As System.IO.Stream

    sioStream = ofdFilePath.OpenFile()

    txtFilePath.Text = ofdFilePath.FileName.ToString()

End Sub