两个CheckBox如何能相互制约,怎么设置属性才能做到

小小蔷薇 2012-04-13 10:30:18
两个CheckBox,选第一个就不选第二个,选第二个就不选第一个,应该怎么设置CheckBox的属性啊?

用的是VS2010
...全文
233 11 打赏 收藏 转发到动态 举报
写回复
用AI写文章
11 条回复
切换为时间正序
请发表友善的回复…
发表回复
htpower 2012-06-13
  • 打赏
  • 举报
回复
楼上的大神们都说完了~
porschev 2012-06-10
  • 打赏
  • 举报
回复

代码判断。。。两个checkbox直接if..else就可以。。

如果更多checkbox,可以写个方法遍历这些checkobx,看是否己有选中项。。。

------------------------

如果是单选,为什么不用单选按钮(radiobutton)?

用户看上去就知道是单选,用户也只能单选,少了些程序的判断,也会避免用户的多余操作
123工艺品 2012-06-10
  • 打赏
  • 举报
回复
代码控制:

VB.NET code
Private Sub CheckBox1_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox1.CheckedChanged
If Me.CheckBox1.Checked = True Then
Me.CheckBox2.Checked = False
End If
End Sub

Private Sub CheckBox2_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox2.CheckedChanged
If Me.CheckBox2.Checked = True Then
Me.CheckBox1.Checked = False
End If
End Sub



也可以换成单选框。



Tosp2012 2012-06-08
  • 打赏
  • 举报
回复

Private Sub CheckBox1_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox1.CheckedChanged
Me.CheckBox2.Checked = Not Me.CheckBox1.Checked()
End Sub
Private Sub CheckBox2_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox2.CheckedChanged
Me.CheckBox1.Checked = Not Me.CheckBox2.Checked()
End Sub
kxyzjm62 2012-06-07
  • 打赏
  • 举报
回复
用RadioButton比较方便
royy918 2012-06-06
  • 打赏
  • 举报
回复
Private Sub CheckBox1_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox1.CheckedChanged
Me.CheckBox2.Checked = Not Me.CheckBox1.Checked()
End Sub

Private Sub CheckBox2_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox2.CheckedChanged
Me.CheckBox1.Checked = Not Me.CheckBox2.Checked()
End Sub

无涯大者 2012-04-16
  • 打赏
  • 举报
回复
代码控制:

Private Sub CheckBox1_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox1.CheckedChanged
If Me.CheckBox1.Checked = True Then
Me.CheckBox2.Checked = False
End If
End Sub

Private Sub CheckBox2_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox2.CheckedChanged
If Me.CheckBox2.Checked = True Then
Me.CheckBox1.Checked = False
End If
End Sub


也可以换成单选框。
小小蔷薇 2012-04-13
  • 打赏
  • 举报
回复
VB.net不能在控件的属性里直接设置吗?
claymore1114 2012-04-13
  • 打赏
  • 举报
回复
js控制,要不 用radio
二当家 2012-04-13
  • 打赏
  • 举报
回复
checkboxlist 有这个组件的
bdmh 2012-04-13
  • 打赏
  • 举报
回复
就俩个,用代码控制吧

16,718

社区成员

发帖
与我相关
我的任务
社区描述
VB技术相关讨论,主要为经典vb,即VB6.0
社区管理员
  • VB.NET
  • 水哥阿乐
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧