- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助]实现按钮切换效果 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=179827)
-- 发布时间：2022/9/13 9:41:00
-- [求助]实现按钮切换效果
此主题相关图片如下：ttt.jpg
怎样实现点击一个按钮后，按钮程选中状态，点击另一个按钮，另一个按钮被选中，这个按钮恢复正常状态的效果。
-- 发布时间：2022/9/13 9:47:00
--
改为状态按钮，然后按钮PressedChanged事件写代码处理，比如
按钮1，PressedChanged：
if e.ToggleButton.Pressed then
RibbonTabs("功能区1").Groups("功能组1").Items("按钮2").Pressed = false
RibbonTabs("功能区1").Groups("功能组1").Items("按钮3").Pressed = false
……
end if
按钮2，PressedChanged：
if e.ToggleButton.Pressed then
RibbonTabs("功能区1").Groups("功能组1").Items("按钮1").Pressed = false
RibbonTabs("功能区1").Groups("功能组1").Items("按钮3").Pressed = false
……
end if