ขอทราบวิธีรับค่า input จาก command line เข้ามาเก็บไว้ใน textbox หน่อยครับ

For Each arg As String In My.Application.CommandLineArgs
            Select Case Trim(LCase(arg))
                Case "Test"
                    MessageBox.Show("OK")
            End Select
        Next

  Public url As String
    Public template_id As String
    Public layer_id As String
    Public media_id As String
    Public type_id As String
    Public height As String
    Public top As String
    Public left As String
    Public index As String
    Public action_id As String
    Public option_id As String
    Sub Main(arg() As String)

        For Each s As String In arg
            MessageBox.Show(s)

        Next

        url = IIf(arg(0) <> "", arg(0), "")
        template_id = IIf(arg(1) <> "", arg(1), "")
        layer_id = IIf(arg(2) <> "", arg(2), "")
        media_id = IIf(arg(3) <> "", arg(3), "")
        type_id = IIf(arg(4) <> "", arg(4), "")
        height = IIf(arg(5) <> "", arg(5), "")
        top = IIf(arg(6) <> "", arg(6), "")
        left = IIf(arg(7) <> "", arg(7), "")
        index = IIf(arg(8) <> "", arg(8), "")
        action_id = IIf(arg(9) <> "", arg(9), "")
        option_id = IIf(arg(10) <> "", arg(10), "")
    End Sub