ConvertToColoredGray example for Visual Basic

   Const RedFact = 300
   Const GreenFact = 590
   Const BlueFact = 110
   Const RedGrayFact = 500
   Const GreenGrayFact = 300
   Const BlueGrayFact = 200
   LEAD1.ConvertToColoredGray RedFact, GreenFact, BlueFact, RedGrayFact, GreenGrayFact, BlueGrayFact