加载中…
个人资料
  • 博客等级:
  • 博客积分:
  • 博客访问:
  • 关注人气:
  • 获赠金笔:0支
  • 赠出金笔:0支
  • 荣誉徽章:
正文 字体大小:

单选框,只能选择其中一个。

(2023-03-04 13:57:55)
标签:

软件

分类: 软件编程
Private Sub Check3_Click(I As Integer)
    If I = 0 And Check3(0).Value = 1 And Check3(1).Value = 1 Then Check3(1).Value = 0
    If I = 1 And Check3(1).Value = 1 And Check3(0).Value = 1 Then Check3(0).Value = 0
End Sub

0

阅读 收藏 喜欢 打印举报/Report
  

新浪BLOG意见反馈留言板 欢迎批评指正

新浪简介 | About Sina | 广告服务 | 联系我们 | 招聘信息 | 网站律师 | SINA English | 产品答疑

新浪公司 版权所有