' Seleccionar el fichero que queremos abrir
Dim ofD As New OpenFileDialog
If ofD.ShowDialog() = DialogResult.OK Then
' Leemos el contenido de ese fichero
Dim sr As New System.IO.StreamReader(ofD.FileName, System.Text.Encoding.Default, True)
' Lo asignamos al TextBox1 del Form2:
frm2.TextBox1.Text = sr.ReadToEnd()
sr.Close()
End If