Is this what you mean. The type will not show up, but it will work.
There is a sample app included.
Code:Public Property Get Font() As Font Set Font = txtTextBox.Font End Property Public Property Set Font(ByVal New_Font As Font) Set txtTextBox.Font = New_Font End Property




Reply With Quote