I hope the code below will helpful to you...
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim sFileName As String = String.Empty
sFileName = Application.ExecutablePath
MsgBox("FullFileName: " & sFileName & vbCr & _
"Executable name: " & IO.Path.GetFileName(sFileName) & vbCr & _
"Path of executable: " & IO.Path.GetDirectoryName(sFileName))
End Sub
Read more about
commandline arguments[
^]