以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  SQL语句中的日期可以用inputvalue让用户自己输入吗？  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=104659)
--  作者：evolymft
--  发布时间：2017/8/2 17:33:00
--  SQL语句中的日期可以用inputvalue让用户自己输入吗？

请问专家：SQL语句中的日期可以用inputvalue让用户自己输入吗？
--  作者：evolymft
--  发布时间：2017/8/2 17:34:00
--  

Where [发薪年月]=#2017-08-01#

SQL语句中的日期可以用inputvalue让用户自己输入吗？
--  作者：有点甜
--  发布时间：2017/8/2 17:51:00
--  

可以的。比如

 

Dim d As Date = date.today
If InputValue(d, "提示", "请输入值") Then
    Dim q As new QueryBuilder
    q.TableName = "查询"
    q.SelectString = "Select * from {表A} where 日期 = #" & d & "#"
    q.Build
    MainTable = Tables("销量统计")
End If
--  作者：evolymft
--  发布时间：2017/8/2 17:58:00
--  
谢谢老师