老师您好！ 我有一个查询，想加上“发货日期为空”的条件，且想在窗口的table中显示，要导出到：excel .怎么实现？谢谢！我的代码：
Dim nms() As String={"DateTimebegin","DateTimeend"}
Dim sps() As String={"#","#"}
Dim bjf() As String={" >= "," <= "}
Dim fds() As String={"接单日期","接单日期"}
Dim filter As String
For i As Integer=0 To nms.length-1
If e.Form.Controls(nms(i)).value IsNot Nothing Then
If filter>"" Then
filter=filter & " and "
End If
filter=filter & fds(i) & bjf(i) & sps(i) & e.Form.Controls(nms(i)).value & sps(i)
End If
Next
Tables("ddpsb").filter=filter
加好友 
发短信
Post By：2020/7/31 13:48:00 [显示全部帖子]
