Dim ssql As String = "1=1"If tsb1 <> Nothing Then ssql = " and 入库日期 >= #" & tsb1 & "#"End If
If tsb2 <> Nothing Then ssql = " and 入库日期 <= #" & tsb2 & "#"End If
加好友 
发短信
Post By：2016/12/6 12:57:00 [显示全部帖子]
