以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]取当月第一天，报错，求助  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=75640)
--  作者：aduydgd
--  发布时间：2015/10/12 10:46:00
--  [求助]取当月第一天，报错，求助
Dim cmd As New SQLCommand
Dim dt As Date
cmd.C
cmd.CommandText = "Select GetDate()"
dt = cmd.ExecuteScalar()
dt = dt.Date
Output.Show(DATEADD("mm",DATEDIFF("mm",0,dt),0))

这个报错，但是我直接在SQL中运行，不会报错
--  作者：大红袍
--  发布时间：2015/10/12 10:48:00
--  
你想做什么？哪句报错？ getDate？
--  作者：大红袍
--  发布时间：2015/10/12 10:50:00
--  

当月第一天这样取

 

Dim d As Date = Date.today
Dim d1 As Date = new Date(d.Year, d.month, 1)
msgbox(d1)