写自定义控件的问题，关于COMBOBOX。

我的自定义控件包含一个combobox,一个label，一个checkbox。我要定义输入框的类型textstyle，由于combobox的style属性只读，所以没法赋值，所以只能枚举变量。
Public Enum enmHsComboBoxStyle
    vbComboDropdown = 0
    vbComboSimple
End EnumPrivate mTextStyle As enmHsComboBoxStyle
    
'输入框类型
Public Property Get TextStyle() As enmHsComboBoxStyle
    TextStyle = mTextStyle
End PropertyPublic Property Let TextStyle(ByVal vdata As enmHsComboBoxStyle)
    mTextStyle = vdata
    Call PropertyChanged("TextStyle")
End Property
请问怎么实现选择不同textstyle的时候，combobox相应的改变。