How to Make Command Line String form VB.NET

[Command Line]
'------------------------------------------------------------
Public Class Form1

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Timer1.Interval = 1
Timer1.Enabled = True
For Each arg As String In My.Application.CommandLineArgs
Select Case Trim(LCase(arg))
Case --a-
Timer1.Enabled = False
MessageBox.Show(-Hello-, -Information-, MessageBoxButtons.OK, MessageBoxIcon.Information)
Me.Show()
End Select
Next
End Sub

Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
Timer1.Enabled = False
MessageBox.Show(-กรุณาเปิดโปรแกรมผ่าน Updater เท่านั้น!-, -Error-, MessageBoxButtons.OK, MessageBoxIcon.Error)
Me.Close()
End Sub
End Class
'------------------------------------------------------------

[Updater]
'------------------------------------------------------------
Public Class Form1

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Try
Catch ex As Exception
MessageBox.Show(ex.Message, -Error-, MessageBoxButtons.OK, MessageBoxIcon.Error, MessageBoxDefaultButton.Button1)
End Try
End Sub
End Class
'------------------------------------------------------------