这样的代码怎么简洁写，
checkbox1,2,3 的值 排列组合，可以是任意一种组合方式，执行的代码相应的变化
if forms("窗口1").controls("checkbox1").checked =true and forms("窗口1").controls("checkbox2").checked =false and forms("窗口1").controls("checkbox3").checked =false then
dim dr as list（of datarow）= datatables("表A").select("第一列 = ")
end if
if forms("窗口1").controls("checkbox1").checked =false and forms("窗口1").controls("checkbox2").checked =true and forms("窗口1").controls("checkbox3").checked =false then
dim dr as list（of datarow）= datatables("表A").select("第二列 = ")
end if
if forms("窗口1").controls("checkbox1").checked =true and forms("窗口1").controls("checkbox2").checked =true and forms("窗口1").controls("checkbox3").checked =false then
dim dr as list（of datarow）= datatables("表A").select("第一列 = and 第二列 = ")
end if
f forms("窗口1").controls("checkbox1").checked =true and forms("窗口1").controls("checkbox2").checked =true and forms("窗口1").controls("checkbox3").checked =TRUE then
dim dr as list（of datarow）= datatables("表A").select("第一列 = and 第二列 = and 第三列 = ")
end if
.
.
.
加好友 
发短信
Post By：2021/9/18 11:31:00 [显示全部帖子]
