选择传感器界面的问题

我的解决方法供参考：下面一组选择令一种控件，相当于单选按钮，只是不方便了，如下面的控件用下拉菜单列表，用几个按钮分别输入几行，在属性窗口每行赋值为0，1，2，3.
点下拉按钮，选0123就行。不懂，猜测，试试可行不。

下面给代码举例，两行的程序，分别输入了+   -符号，你可以多用两行，用4行。
Private Sub Form_Load()
With Combo1
.AddItem "+"
.AddItem "-"
.ListIndex = 0
End With

代码可以这样：
Private Sub Form_Load()
With Combo1
.AddItem "序号5"
.AddItem "序号6"
.AddItem "序号7"
.AddItem "序号8"
.ListIndex = 0
End With
end  sub

下拉列表，不方便操作。
建议用复选框。
在复选框响应事件里判断一下。

如果当前点击的控件为选中，那么就清掉其它选项的选择。这个直接使用循环直接清就行了。
否则不清了。

Private Sub Check1_Click(Index As Integer)
Dim ck As CheckBox                      '定义变量
If Check1(Index).Value = 1 Then         '当前是否选择
    For Each ck In Check1               '循环开始
        If ck.Index <> Index Then       '是否是当前控件
            ck.Value = 0                '不是，则设置未选择
        End If
    Next
End If
End Sub