以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]功能区如何设置单选按钮？  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=179289)
--  作者：moseser
--  发布时间：2022/8/16 20:28:00
--  [求助]功能区如何设置单选按钮？
如题
--  作者：有点蓝
--  发布时间：2022/8/16 20:32:00
--  
没有单选按钮，改为使用组合框下拉选择
--  作者：chnfo
--  发布时间：2022/8/16 22:13:00
--  
如果每一行的单选项是相同的（比如选项ABC），可以考虑增加三个表达式列ABC（boolean型）,然后用一列值V来保存选项
然后datacolchanged事件里
dim s as string = "A,B,C"
select case e.datacol.name
case "A","B","C"
if e.datarow(e.datacol.name) = true then 
systemready = false 
for each c as string in s.split(",")
e.datarow(c) = false 
next
e.datarow(e.datacol.name) = true
e.datarow("V") = e.datacol.name
systemready = true
end if 
end select