- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 按钮统计后订单编号日期自动变下一天的日 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=89940)
-- 发布时间：2016/9/1 17:15:00
-- 按钮统计后订单编号日期自动变下一天的日
此主题相关图片如下：qq图片20160902013949.png
各位版主老师：如何在按钮统计当天订单后 再增加订单编号日期自动变下一天的日期 |
-- 发布时间：2016/9/1 17:58:00
--
Dim dr1 As Row = Tables("明细表").Rows(Tables("明细表").Rows.Count - 1)
Dim dr As Row = Tables("明细表").AddNew
Dim d As Date = dr1("日期")
If 已结账 Then
dr("日期") = d.AddDays(1)
Else
dr("日期") = d
End If
-- 发布时间：2016/9/2 11:39:00
--
谢谢！