Public Function SetCurrentCommand( _
   ByVal Command As Command _
) As Boolean