以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]关于单选框的问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=104455)
--  作者：科研小子
--  发布时间：2017/7/29 14:48:00
--  [求助]关于单选框的问题

图片点击可在新窗口打开查看此主题相关图片如下：1.png
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下：2.png
图片点击可在新窗口打开查看

见图1，在窗口1界面，有4个单选框，每次只能选择一个状态（好像单选框自带功能），将选定的框的状态[true or false]返回绑定表1的同名列，见图2。最简单的是用绑定的方法，但发现数据表那边无法做到只有一个勾选；想直接不绑定，单击保存按钮后，直接将选定的单选框返回到数据表的同名列，但不会写代码，呜呜，求教各位大神！！！！

[此贴子已经被作者于2017/7/29 14:50:08编辑过]
--  作者：有点蓝
--  发布时间：2017/7/29 15:51:00
--  
表datacolchanged事件

Select e.DataCol.name
    Case "可疑","待查","初步","确诊"
        Dim lst As new List(of String)
        lst.AddRange(new String(){"可疑","待查","初步","确诊"})
        lst.Remove(e.DataCol.name)
        If e.newvalue = True Then
            For Each c As String In lst
                e.DataRow(c) = False
            Next
        End If
End Select
--  作者：科研小子
--  发布时间：2017/7/29 16:17:00
--  感谢，谢谢亲！！
感谢，谢谢亲！！