以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  求助，想问下，我经过某个按钮，其他按钮背景色都一起变，要怎么写？  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=139792)
--  作者：zto001
--  发布时间：2019/8/21 18:16:00
--  求助，想问下，我经过某个按钮，其他按钮背景色都一起变，要怎么写？
求助，想问下，我经过某个按钮，其他按钮背景色都一起变，要怎么写？
For Each c As WinForm.Control In Forms("聊天").Controls
    If Typeof c Is WinForm.Button  And c.Name.Contains("好友HY|ID" )Then \'判断控件
        Forms("聊天").(c.Name).Contains.BackColor = Color.Transparent 
    End If
Next
红色地方应该怎么写呢？
--  作者：狐狸爸爸
--  发布时间：2019/8/22 8:45:00
--  
For Each c As WinForm.Control In Forms("聊天").Controls
    If Typeof c Is WinForm.Button  Then \'判断控件
          c.BackColor = Color.Blue
    End If
Next
[此贴子已经被作者于2019/8/22 8:45:39编辑过]
--  作者：zto001
--  发布时间：2019/8/22 10:37:00
--  
还有个问题，我如何取消按钮的鼠标经过时的背景色以及鼠标按下时的背景色？设置无色的，直接跟背景色叠加了变白了
--  作者：有点蓝
--  发布时间：2019/8/22 10:40:00
--  
不支持透明色