组合框里的文字默认设置了颜色,鼠标进入时颜色就变了,现在鼠标进入和离开时不想有任何的动作,也就是文字不变颜色,
MouseEnter事件写了一大堆代码,有什么简洁的方法吗?
Select Case True
Case e.sender.name.StartsWith("ComboBoxFilterCol")
If e.sender.text = "筛选列" Then
e.sender.ForeColor = Color.Silver
Else
e.sender.ForeColor = Color.Black
End If
Case e.sender.name.StartsWith("ComboBoxFilterList")
If e.sender.text = "条件" Then
e.sender.ForeColor = Color.Silver
Else
e.sender.ForeColor = Color.Black
End If
Case e.sender.name.StartsWith("CheckedComboBoxFilter")
If e.sender.text = "筛选值" Then
e.sender.ForeColor = Color.Silver
Else
e.sender.ForeColor = Color.Black
End If
End Select