[الطالب]

سلام

هذا مثال

كود :

Public Class Form1

Protected Overrides Sub SetVisibleCore(ByVal value As Boolean)
    If Not IsHandleCreated Then
        CreateHandle()
        value = False
    End If
    MyBase.SetVisibleCore(value)
        '----------------------------
        Call CommandLine()
    End Sub

    Private Sub CommandLine()
        For Each arg As String In My.Application.CommandLineArgs
            If arg = "/msg" Then
                MsgBox("مرحبا")
            End If
        Next
        '----------------------------
        Application.Exit()
    End Sub

End Class

موفقين