home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic 6 Unleashed…sional Reference Edition) / Visual_Basic_6_Unleashed_Professional_Reference_Edition_Sams_1999.iso / Source / CHAP05 / 309X0514.TXT < prev    next >
Encoding:
Text File  |  1998-05-27  |  257 b   |  15 lines
  1.  
  2. Public Property Get Enabled() As Boolean
  3.  
  4.      Enabled = UserControl.Enabled
  5.  
  6. End Property
  7.  
  8.  
  9. Public Property Let Enabled(ByVal NewValue As Boolean)
  10.  
  11.      UserControl.Enabled = NewValue
  12.      UserControl.PropertyChanged "Enabled"
  13.  
  14. End Property
  15.