Question

我在Visual Basic 2013中创建了自己的文本编辑器。我想从应用程序外部打开文本文件：通过双击或右键单击打开它们，然后打开。

我尝试使用右键单击并打开，但它不起作用，它只是打开我的应用程序。

我如何使用我打开文本文件的文本编辑器？

Answer 1

您必须使用类似Environment.GetCommandLineArgs方法的内容。

将它放在表单加载事件中：

Dim CommandLineArguments() As String = Environment.GetCommandLineArgs()
If CommandLineArguments.Length >= 2 AndAlso String.IsNullOrEmpty(CommandLineArguments(1)) = False AndAlso IO.File.Exists(CommandLineArguments(1)) Then
    Me.TextBox1.Text = IO.File.ReadAllText(CommandLineArguments(1))
End If

这将获取发送到您的应用程序的命令行参数（这是您尝试使用您的应用程序打开的文件的路径）并检查参数是否是现有文件。如果是这样，它会将所有文件的文本读入TextBox。

Answer 2

将此代码写入表单加载事件中。

Private Sub form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load

 Dim fname As String = Command$()
        If Not fname = "" Then
            fname = Replace(fname, Chr(34), "")
            Dim obj As New System.IO.StreamReader(fname.ToString)
            RichTextBox1.Rtf = obj.ReadToEnd
            obj.Close()
            Me.Text = "Your Application Name " & fname

        End If

End Sub

VB.NET设置默认文本编辑器

2 个答案: