Returns an ArgumentCollection containing each Argument object defined for this command.
// get accessor ArgumentCollection rtn = Command.Arguments; // set accessor Command.Arguments = ArgumentCollection; |
set cmd = Application.Commands("Twist")
for each a in cmd.Arguments
LogString = a.Name & ":" & a.Flags & ":"
if a.Flags = siArgumentInput or a.Flags = siArgumentInputOutput then
LogString = LogString & CStr(a.Value)
end if
LogMessage LogString
next
|