Cannot change Working Units Labels using MVBA

I am planning to convert files from International Feet to U.S. Survey feet using a simple VBA macro.  I can change the Working Units and Storage Units with no problem:

CadInputQueue.SendKeyin ("set units ""US Survey Feet"" ""US Survey Inches"" ")
CadInputQueue.SendKeyin ("set storageunit US Survey Foot")

However, I cannot change the MU and SU labels in my MVBA code. 

  • The SET UNITS key-in doesn't allow for setting the label. 
  • Tried using  ActiveModelReference.MasterUnit.Label = <value>, but that does not write the change.

Is there any way I can accomplish this in my code?

Running MicroStation CE