这二代码,功能冲突,如何处理?
Dim t1 As String = e.form.controls("TextBox1").text
Dim t2 As String = e.form.controls("ComboBox1").text
Dim t3 As String = e.form.controls("ComboBox2").text
Dim t4 As String = e.form.controls("TextBox9").text
Dim t5 As String = e.form.controls("TextBox10").text
Dim t6 As String = e.form.controls("ComboBox5").text
Dim t7 As String = e.form.controls("DateTimePicker1").text
e.form.controls("按键1").enabled = Not ( t1 = "" OrElse t2 = "" _
OrElse t3 = "" OrElse t4 = "" OrElse t5 = "" _
OrElse t6 = "" OrElse t7 = "")
--------------------------------------------------
If DataTables("表A").compute("count(审核)", "审核=false") > 0 Then
forms("入库登记").controls("按键1").enabled = False
Else
forms("入库登记").controls("按键1").enabled = True
End If
---------------------------------------------------------------