在VB6.0里 用多选框怎么做单选，代码应该怎么写？麻烦高手指导下。

在VB6.0里 用多选框怎么做单选，代码应该怎么写？麻烦高手指导下。

如果有多个 多选框 的话

程序运行，首先要判断是哪一个被选中，还是有多个被选中，然后执行对应的代码

Private Sub Command1_Click()

If Check1.Value = 1 And Check2.Value = 0 Then '如果多选框1被选中，并且2没有被选中

Text1.Text = "1"

ElseIf Check2.Value = 1 And Check1.Value = 0 Then

Text1.Text = "2"

Else

Text1.Text = "0"

End If

End Sub

这是一段简单的有点幼稚的代码，就是在单击按钮时，判断是哪个 多选框 被选中了。。。

如果多选框比较多的话，最好是用控件组，然后用select case或者其他循环语句进行判断。。。

if xxx=true then

xxx=false

xxx=false

end

你可以用opnion单选控件，还是你一定要用多选空间来实现单选