¿Cómo puedo utilizar el Abierto Con la función en el explorador de Archivos para abrir un archivo de texto en mi aplicación?

Usted realmente no necesita todos Explorador de Archivos para lograr esto. El uso de la OpenFileDialog clase. La puede leer el archivo en el cuadro de texto. Asegúrese de que el cuadro de texto que está utilizando tiene Multiline se establece en True.

Private Sub OpenFileInTextBox()
    Dim OFD As New OpenFileDialog
    OFD.InitialDirectory = Environment.GetFolderPath(Environment.SpecialFolder.MyDocuments)
    OFD.Filter = "Text Files (*.txt)|*.txt"
    Dim fileSelected As String = ""
    If OFD.ShowDialog() = DialogResult.OK Then
        fileSelected = OFD.FileName
    Else
        MessageBox.Show("Not file selected")
        Exit Sub
    End If
    TextBox1.Text = File.ReadAllText(fileSelected)
End Sub