以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]新的月份外部数据库载入出错  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=72552)

--  作者:elfing
--  发布时间:2015/8/1 1:48:00
--  [求助]新的月份外部数据库载入出错
软件在上个月启动时加载数据一直正常,今天打开软件出现如图提示,表达式那些地方需要改进呢?烦请指教


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20150801013833.png
图片点击可在新窗口打开查看


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20150801014205.png
图片点击可在新窗口打开查看


--  作者:y2287958
--  发布时间:2015/8/1 8:11:00
--  
看看m-1会不会等于0
--  作者:逛逛
--  发布时间:2015/8/1 10:18:00
--  

时间区间计算尽量用日期函数

 

如:

Dim d As Date = Format(Date.Today,"yyyy-MM-1")
Dim dt As Date = Format(d.AddDays(-1),"yyyy-MM-dd 23:59:59")   \'上月的最后一天
Dim dt1 As Date = d.AddMonths(-1)   \'上月的第一天

Output.show(dt)


--  作者:大红袍
--  发布时间:2015/8/2 10:55:00
--  

 直接写

 

Dim d As Date = Date.Today.AddMonths(-1)

Dim dt As Date = New Date(d.Year, d.Month, 1)