我在编辑combobox的value变化的代码发生了错误,调试了半天也没有明白错在哪里,不过如过我把 贸易形式的 = '一般' 删除后就正常了,问题一定是出在这个地方,但我在以前的编辑中也是如此写的,为什么没有问题?代码如下。
Dim xh As String = e.Form.Controls("ComboBox1").value
Dim ph As String = e.Form.Controls("ComboBox2").value
If xh = "" And ph = "" Then
DataTables("销售在库表").LoadFilter = "是否销完 = false And 贸易形式 = '一般'"
DataTables("销售在库表").load
Else
If xh = "" Then
DataTables("销售在库表").LoadFilter = "产品批号 = '"& ph &"' And 贸易形式 ='一般'"
DataTables("销售在库表").load
Else
If ph = "" Then
DataTables("销售在库表").LoadFilter = "产品型号 = '"& xh &"' and 贸易形式 = '一般'"
DataTables("销售在库表").load
Else
DataTables("销售在库表").LoadFilter = "产品型号 = '"& xh &"' And 产品批号 = '"& ph &"' And 贸易形式 = '一般'"
DataTables("销售在库表").load
End If
End If
End If