Foxtable(狐表)用户栏目专家坐堂 → 日期 如何返回 星期几


  共有2268人关注过本帖树形打印复制链接

主题:日期 如何返回 星期几

帅哥哟,离线,有人找我吗?
puresky
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:187 积分:1987 威望:0 精华:0 注册:2017/1/21 16:12:00
日期 如何返回 星期几  发帖心情 Post By:2017/2/16 11:02:00 [只看该作者]

table中有一列是日期,新增一列,如何自动产生星期几。求相助,这些数据变化,是最常用的啊。

 回到顶部
帅哥哟,离线,有人找我吗?
有点色
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/2/16 11:26:00 [只看该作者]

DataColChanged事件

 

If e.DataCol.name = "日期" Then
    If e.NewValue <> nothing Then
        e.DataRow("星期") = format(e.NewValue, "dddd")
    Else
        e.DataRow("星期") = Nothing
    End If
End If

[此贴子已经被作者于2017/2/16 11:26:20编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
puresky
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:187 积分:1987 威望:0 精华:0 注册:2017/1/21 16:12:00
  发帖心情 Post By:2017/2/16 11:45:00 [只看该作者]

if e.newvalue <> nothing 能否写成   if e.datarow.isnull("日期")

 回到顶部
帅哥哟,离线,有人找我吗?
有点色
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/2/16 11:55:00 [只看该作者]

写成

 

If e.datarow.isnull("日期") = False Then


 回到顶部