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

maifans 2004-08-11 04:34:35
我的自定义控件包含一个combobox,一个label,一个checkbox。我要定义输入框的类型textstyle,由于combobox的style属性只读,所以没法赋值,所以只能枚举变量。
Public Enum enmHsComboBoxStyle
vbComboDropdown = 0
vbComboSimple
End Enum

Private mTextStyle As enmHsComboBoxStyle

'输入框类型
Public Property Get TextStyle() As enmHsComboBoxStyle
TextStyle = mTextStyle
End Property

Public Property Let TextStyle(ByVal vdata As enmHsComboBoxStyle)
mTextStyle = vdata
Call PropertyChanged("TextStyle")
End Property
请问怎么实现选择不同textstyle的时候,combobox相应的改变。
...全文
125 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
CatchWind 2004-08-13
  • 打赏
  • 举报
回复
要不就自己重寫Combo控件.
maifans 2004-08-11
  • 打赏
  • 举报
回复
只用一个combobox,有办法吗?谢谢帮忙!
faib920 2004-08-11
  • 打赏
  • 举报
回复
使用三个combobox
然后设置成相应的三种样式
设置TextStyle后再set ...=...

1,451

社区成员

发帖
与我相关
我的任务
社区描述
VB 控件
社区管理员
  • 控件
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧