desde luego es algo facil, ya hay un post parecido al tuyo, pero te encargo que no coloques ese tipo de titulos porque no ayudan a fururos usuarios que busquen respuestas a sus preguntas..
el codigo es algo asi..
Código:
argumentos = Interaction.Command$
If Len(argumentos) > 1 Then
Desvio = argumentos
End If
donde Interaction.Command$ es el que recibe los comandos..
nos vemos..