Quando a propriedade TransparentMode está configurada para 2 (dois), esta propriedade define quão translúcida a imagem é exibida, variando de 0 (zero, totalmente translúcida) a 100 (opaca ou sólida). O script a seguir contém um exemplo de uso desta propriedade.

Sub DrawPicture1_Click()
  ' Deixa a imagem translúcida quando se clica no objeto
  TransparentMode = 1 ' ByPercent
  TransparentPercent = 50 ' 50% translúcido
End Sub