I know that you can create new property's for a form using the following code:

Public Property Get test() As Variant

End Property

Public Property Let test(ByVal vNewValue As Variant)

End Property

Is it possible to add new property's to other controls such as a Text Box.