vb简化问题

来源：百度知道 编辑：UC知道 时间：2024/07/02 12:47:28
下面是单独计算测试
dd等于0 to 11( 12个复选框）
如dd 分别等于0，10（复选0和复选10被选择），下面代码可以得到正确数据

If Form9.Option1(1) = True And Form9.Option2(1) = True Then

If (ww(10) <> mi(10) Or ww(0) <> mi(0)) And Form9.Check1(dd).Value Then MSFlexGrid1.RemoveItem i

End If
如dd 分别等于0，10，11（复选0和复选10和复选11被选择），下面代码可以得到正确数据
If Form9.Option1(1) = True And Form9.Option2(1) = True Then

If (ww(10) <> mi(10) Or ww(11) <> mi(11)) And (ww(10) <> mi(10) Or ww(0) <> mi(0)) And (ww(11) <> mi(11) Or ww(0) <> mi(0)) And Form9.Check1(dd).Value Then MSFlexGrid1.RemoveItem i
如dd 分别等于0，1，10，11（复选0和复选10和复选11和复选1被选择），下面代码可以得到正确数据

End If
If Form9.Option1(1) = True And Form9.Option2(1) = True Then

If (ww(10) <> mi(10) Or ww(11) <> mi(11)) And

什么意思啊？听不懂,option好像是单选的哦
可以得到正确数据
是什么数据呢？用简单的例子说明一下哦
用控件数组很方便啊

比如：
for i=0 to 11
aa=aa & iif(check1(i).value，check1(i).caption,"")
next
?aa
就打印出所有被选中的名字