Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件,完美融合Access、Foxpro、Excel、vb.net之优势,人人都能掌握的快速软件开发工具!
共3 条记录, 每页显示 10 条, 页签: [1]
[浏览完整版]

标题:请教表达式列能计算日期吗?

1楼
狐友 发表于:2011/8/24 15:35:00

请教表达式列能计算日期吗?

 

比如销售日期等于[生产日期]+7天,该如何写呢,谢谢

2楼
zhangqinyun 发表于:2011/8/24 15:45:00

在DataChanged 里加

Dim dr As DataRow = e.DataRow
Dim dc As DataCol = e.DataCol
Select Case dc.Name
    Case "生产日期"
        If dr.IsNull("生产日期") Then
            dr("销售日期") = ""
        Else
            dr("销售日期") = Date.Today.AddDays(7)

    End If

End Select

3楼
zhangqinyun 发表于:2011/8/24 15:46:00

刚才写错了

 

在DataChanged 里加

Dim dr As DataRow = e.DataRow
Dim dc As DataCol = e.DataCol
Select Case dc.Name
    Case "生产日期"
        If dr.IsNull("生产日期") Then
            dr("销售日期") = ""
        Else
            dr("销售日期") = dr("生产日期").AddDays(7)

    End If

End Select

共3 条记录, 每页显示 10 条, 页签: [1]

Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .01953 s, 2 queries.