如何从 Windows 资源管理器打开文件并将其加载到富文本控件中？

Question

我正在用 Visual Basic 编写文字处理器，并试图让我的应用程序加载从 Windows 资源管理器打开的文件。我找到了这段代码，但它似乎不起作用：

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles Me.Load
    Dim s As String

    s = Command$()

    If s <> "" Then
        RichTextBox1.LoadFile(s)
    Else
        '
        ' Do something else since no file was specified
        ' 
    End If
End Sub

谁能帮忙？

Answer 1

您可以使用 OpenFileDialog 来模拟 Windows 资源管理器。

Private Sub FileToRTB()
    Dim fName As String = ""
    Dim d As New OpenFileDialog
    d.Filter = "Rich Text Files (*.rtf)|*.rtf"
    If d.ShowDialog = DialogResult.OK Then
        fName = d.FileName
        RichTextBox1.LoadFile(fName)
    End If
End Sub