Yes, create a public property called "LabelCaption" as a string. Then assign the value for the property to the label's caption, like this:
Code:Public Property Get LabelCaption() As String LabelCaption= Label1.Caption End Property Public Property Let LabelCaption(ByVal asNewCaption As String) Label1.Caption = asNewCaption End Property




Reply With Quote