Rss & SiteMap

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

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

标题:请教如何用代码生成周龄值?

1楼
liuruihua 发表于:2009/11/2 12:26:00
用户已锁定!
2楼
czy 发表于:2009/11/2 13:42:00
'DataColChanged事件代码:
Dim dr As DataRow = e.DataRow
if e.DataCol.Name = "日龄" Then
    if dr.IsNull("日龄") Then
        dr("周龄") = Nothing
    Else
        if dr("日龄") mod 7 = 0 Then
            dr("周龄") = dr("日龄") \ 7
        Else
            dr("周龄") = (dr("日龄") \ 7)+1
        End If
    End If
End If
3楼
liuruihua 发表于:2009/11/2 18:51:00
用户已锁定!
共3 条记录, 每页显示 10 条, 页签: [1]

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

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