VB Code:
  1. Private Sub Form_Load()
  2. Dim sArgs() As String
  3. Dim i As Integer
  4.  
  5.  
  6. sArgs = Split(Command, "/")
  7.  
  8.  
  9. If sArgs(1) = "yes " Then
  10.     MsgBox "YUp1"
  11. Else
  12.     MsgBox "nope"
  13. End If
  14.  
  15. If sArgs(2) = "yes " Then
  16.     MsgBox "YUp2"
  17. Else
  18.     MsgBox "nope"
  19. End If
  20.  
  21. If sArgs(3) = "yes" Then
  22.     MsgBox "YUp3"
  23. Else
  24.     MsgBox "nope"
  25. End If
  26.  
  27. End Sub