[讨论]日期怎么转数值？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [讨论]日期怎么转数值？

共有10143人关注过本帖树形打印复制链接主题：[讨论]日期怎么转数值？

newbeehh

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：17 积分：221 威望：0 精华：0 注册：2012/11/10 16:04:00

[讨论]日期怎么转数值？ 发帖心情

Post By：2012/11/23 23:34:00 [只看该作者]

我的意思是，有3列数据：

第一列：开始时间

第二列：结束时间

第三列：结果

假如：2012年11月22日（结束时间）减 2012年11月20（开始时间）>=2，返回值为“与”字符，否则返回“至”字符。

显示结果：1、2012年11月20日至2012年11月22日

　　　　　2、2012年11月20日与2012年11月22日

2种

lin_hailun

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：狐神帖子：6708 积分：34304 威望：0 精华：11 注册：2012/8/18 23:10:00

Post By：2012/11/24 8:48:00 [只看该作者]

你的数据表的数据是怎么样的？请上传一个例子，这个问题很好解决的。

狐狸爸爸

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：管理员帖子：47497 积分：251403 威望：0 精华：91 注册：2008/6/17 17:14:00

Post By：2012/11/24 8:53:00 [只看该作者]

表的DataColChanged代码：

Select Case e.DataCol.name
    Case "开始时间","结束时间"
        Dim dr As DataRow = e.DataRow
        If dr("开始时间").Adddays(2) >= dr("结束时间")
            dr("结果") = Format(dr("开始时间"),"yyyy年MM月dd日") & "与" & Format(dr("结束时间"),"yyyy年MM月dd日")
        Else
            dr("结果") = Format(dr("开始时间"),"yyyy年MM月dd日") & "至" & Format(dr("结束时间"),"yyyy年MM月dd日")
        End If
End Select

下载信息 [文件大小：下载次数： ]
点击浏览该文件:管理项目45.table

[此贴子已经被作者于2012-11-24 8:53:55编辑过]

下一主题 >> << 上一主题

主题：[讨论]日期怎么转数值？