Visual Basic Set Command Batch