处理ComboBox不可用
各给大虾:
在用户界面中要使combobox的下拉不可用应该使用它的什么属性(Enabled除外)。
谢谢！
[解决办法]
没下拉行吗？
DropDownStyle=Simple
[解决办法]
没有找到办法...
[解决办法]
继承这个combobox,做个自定义控件,定义一下属性,比如isReadOnly
Private iniDropDownStyle As ComboBoxStyle = Me.DropDownStyle
Private iniBackColor As System.Drawing.Color = Me.BackColor
Private isReadOnly As Boolean = False
Public Property [ReadOnly]() As Boolean
Get
Return isReadOnly
End Get
Set(ByVal Value As Boolean)
isReadOnly = Value
If Value = True Then
Me.DropDownStyle = ComboBoxStyle.Simple
Me.BackColor = System.Drawing.SystemColors.Control
Else
Me.DropDownStyle = iniDropDownStyle
Me.BackColor = iniBackColor
End If
End Set
End Property
Protected Overrides Sub OnKeyPress(ByVal e As System.Windows.Forms.KeyPressEventArgs)
e.Handled = Me.ReadOnly
End Sub
Protected Overrides Sub OnMouseDown(ByVal e As System.Windows.Forms.MouseEventArgs)
If Me.ReadOnly = True Then
If e.Button = MouseButtons.Right Then
Me.ContextMenu = New ContextMenu
End If
End If
End Sub
[解决办法]
动态添加其中的Item项就好了
