• Home
 · 
• OLE/COM/DCOM/Active-X
 · 
• IMPLEMENTING A PROPERTY FOR A CUSTOM CONTROL

IMPLEMENTING A PROPERTY FOR A CUSTOM CONTROL

IMPLEMENTING A PROPERTY FOR A CUSTOM CONTROL

Rate IMPLEMENTING A PROPERTY FOR A CUSTOM CONTROL

• 1
• 2
• 3
• 4
• 5

(2(2 Vote))

Option Explicit
Private mOverallColor As Long
Property Get OverallColor() As Long
   OverallColor = mOverallColor
End Property
Property Let OverallColor(lColor As Long)
   mOverallColor = lColor
   'informs the system that a
   'property has changed:
   PropertyChanged
End Property