以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]MouseEnter鼠标进入不想有任何的动作  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=177003)

--  作者:2425004926
--  发布时间:2022/5/6 10:56:00
--  [求助]MouseEnter鼠标进入不想有任何的动作
组合框里的文字默认设置了颜色,鼠标进入时颜色就变了,现在鼠标进入和离开时不想有任何的动作,也就是文字不变颜色,
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

--  作者:有点蓝
--  发布时间:2022/5/6 11:24:00
--  
那就去掉MouseEnter事件代码咯
--  作者:2425004926
--  发布时间:2022/5/6 11:56:00
--  
 如果去掉MouseEnter事件代码,鼠标晃一下,文字颜色就变了