Private Sub btn_LoadValues_Click(ByVal sender As System.Object, ByVal e As _
  System.EventArgs) Handles btn_LoadValues.Click
 
        With ofd_LoadValues
            .Filter = ("xxxxxx Files (*.xxxx)|*.xxxx|All Files (*.*)|*.*")
            .Title = ("Load Values...")
            .InitialDirectory = "C:\"
            .ShowDialog()
            If ofd_LoadValues.ShowDialog() = DialogResult.OK Then
                Dim sr As New System.IO.StreamReader(ofd_LoadValues.FileName)
                MessageBox.Show(sr.ReadToEnd)
                sr.Close()
            End If
        End With
 
    End Sub