With e.Form.Controls("fkxqDateTimePicker")
If .Value IsNot Nothing Then
If Filter > "" Then
Filter = Filter & " And "
End If
Filter = Filter & "付款限期= '" & .Value & "'"
End If
End With
With e.Form.Controls("jbrComboBox")
If .Value IsNot Nothing AndAlso.value<>"所有经办人" Then
If Filter >"" Then
Filter = Filter & " And "
End If
Filter = Filter & "经手人 = '" & .Value & "'"
End If
End With
With e.Form.Controls("bzsmTextBox")
If .text IsNot Nothing Then
If Filter >"" Then
Filter = Filter & " And "
End If
Filter = Filter & "说明 Like '%" & .text & "%'"
End If
End With
这段代码哪有问题,怎么只要“说明” 字段是空时不出来呢?
已经解决
[此贴子已经被作者于2020/3/7 23:21:36编辑过]