初哥求助!查询每月的记录。

pytoto 2004-09-14 07:49:08
库中有一字段记录报表日期

找到所有日期符合text1.text中录入的条件,比如输入2004-9就查询2004年9月份的记录,输入2004就查询2004整年的记录,录入2004-9-9就查询2004年9月9日的记录。

这种SQL语句得怎么写?用LIKE吗?

我用SELECT * FROM BAIO WHERE BBRQ LIKE TEXT1.TEXT 好像不行啊,各位老师帮我一下。
...全文
122 3 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
of123 2004-09-14
  • 打赏
  • 举报
回复
报表日期是什么类型?如果是日期时间类型:

dim strTemp as string, strSql as string

if not isdate(text1) then
msgbox "请输入合法的日期"
text1.selstart = 0
text1.sellength = len(text10
text1.setfocus
exit sub
endif
strTemp = text1
if len(strTemp) - len(replace(strTemp, "-", "") = 2 then
strSql = "SELECT * FROM BAIO WHERE BBRQ =#" & format(text1, "yyyy-mm-dd") & "#"
else
strSql = "SELECT * FROM BAIO WHERE BBRQ BETWEEN #" & format(text1, "yyyy-mm-dd") & "# AND #" & format(DateAdd("m",1,text1),"yyyy-mm-dd") & "#"
End if
sangshuyezi 2004-09-14
  • 打赏
  • 举报
回复
我觉得楼主可以改一种方式,把日期分三个段:年、月、日。如果只输入了年,月日都空着那语句是
"SELECT * FROM BAIO WHERE year(BBRQ) = '" & TextYear.TEXT & "'"
如果只输入了月则可以是:
"SELECT * FROM BAIO WHERE month(BBRQ) = '" & TextMonth.TEXT & "'"
等等。
sangshuyezi 2004-09-14
  • 打赏
  • 举报
回复
"SELECT * FROM BAIO WHERE BBRQ LIKE '%" & TEXT1.TEXT & "%'"

1,217

社区成员

发帖
与我相关
我的任务
社区描述
VB 数据库(包含打印,安装,报表)
社区管理员
  • 数据库(包含打印,安装,报表)社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧