[Solved] Help with "Open with"

[stepdragon]

after a couple of tries i got this:

        If Environment.GetCommandLineArgs.Count > 1 Then
            Dim filename As String = Environment.GetCommandLineArgs(1).ToString
            TextBox1.Text = filename
        End If

What I wrote was a proof of concept, it wasn't meant to work via copy and paste. That way you could adapt it to your needs. I'm glad it was of use.