I have made an active x control that is just a textbox with a format property that automatically formats the text as you type to something (i.e. Phone Number, SSN, Proper noun). All that works fine where my problem is is when you use the control on a form and set the format property at design time it doesn't keep it during run time. Everything works at run time and the control works as long as you set the format property at run time. What saves the property at design time to use at run time?

Here is the Code for the Format Property:

Public Enum FTypes
ftNone
ftDate
ftTime
ftSSN
ftPhone
ftProper
ftUpper
ftLower
End Enum

Private FType As FTypes

Public Property Get Format() As FTypes
Format = FType
End Property

Public Property Let Format(vNewValue As FTypes)
FType = vNewValue
End Property