Jak mohu použít Open Se funkce v Souboru explorer otevřete textový soubor v aplikaci?

Opravdu nepotřebujete všechny File Explorer k dosažení tohoto cíle. Použití OpenFileDialog třídy. Můžete si přečíst soubor do textového pole. Ujistěte se, že textové pole, který používáte Víceřádkové nastavena na hodnotu 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