老师,只要其中的一个列不满足条件,就不可以选中列FUsed,以下黄色的有错吗 ? 加了这个条件后就不对了。谢谢。
Dim gx As WinForm.checkbox=e.Form.controls("勾选")
Dim t As Table = e.Form.controls("Table1").Table
For Each r As Row In t.rows
If r("FunitID") = 0 Or r("FItemID") = 0 Or r("FSupID") = 0 Or r("FCyID") = 0 Or r("FPType") = 9 Or r("FCurrencyID") = 0 Or DataTables("t_SupplyEntry").find("ID='" & r("ID") & "'") Is Nothing Or DataTables("ConfirmList").find("ID='" & r("ID") & "'") Is Nothing Then Continue For
r("FUsed") = gx.Checked
Next