Foxtable(狐表)用户栏目专家坐堂 → 分组框能实现统一设定代码功能么


  共有1737人关注过本帖树形打印复制链接

主题:分组框能实现统一设定代码功能么

帅哥哟,离线,有人找我吗?
大清河
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:92 积分:898 威望:0 精华:0 注册:2017/11/9 10:09:00
分组框能实现统一设定代码功能么  发帖心情 Post By:2017/12/19 17:14:00 [显示全部帖子]


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20171219170832.png
图片点击可在新窗口打开查看
求助老师:我想实现点击“首页”时,这个按钮字体变蓝加粗、背景变黑色,当点击其他按钮时其他按钮字体变蓝加粗、背景变黑色,“首页”恢复如初。他们互相都是这样的关系。

能用分组框里的mousedown事件统一设定代码么?

这是我在“首页”按钮mousedown事件代码:

e.sender.BackColor=Color.black '设置按钮背景颜色;
Dim rt As New Font(Cstr(e.Sender.Font.Name),14,FontStyle.Bold) '设置字体;
e.Sender.Font=rt
e.Sender.ForeColor=Color.FromARGB(255,45,148,193)'设置按钮字体颜色;


 回到顶部