代码之家 › 专栏 › 技术社区 › user5330265

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

windows-explorer windows vb.net

1

user5330265 · 技术社区 · 11 年前

我已经在Visual Basic 2013中创建了自己的文本编辑器。我想从应用程序外部使用它打开文本文件:双击或右键单击桌面打开文本文件,然后使用打开。

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

如何使文本编辑器成为打开文本文件的编辑器?

2 回复 | 直到 11 年前

1

2

Visual Vincent 11 年前

你必须使用类似 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 .

2

1

Mir Rahed Uddin 7 年前

在表单加载事件中编写此代码。

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