Foxtable(狐表)用户栏目专家坐堂 → 日期列默认值


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

主题:日期列默认值

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


加好友 发短信
等级:小狐 帖子:364 积分:3491 威望:0 精华:0 注册:2012/7/24 7:15:00
日期列默认值  发帖心情 Post By:2014/4/20 11:59:00 [只看该作者]

表中有“日期1”列和“日期2”列,“日期1”列在新增一行时,默认值为当前日期,“日期2”列暂时不写入值。
我想在表增加一行后,此表倒数第二行的“日期2”列自动填充值“日期1”列新增行的值,应该在DataRowAddingDataRowAdded中加什么代码?
  倒数第二行 2014-04-10     写入:“2014-04-20” 
   新增行2014-04-20   空着

我说明白了吗?
谢谢!

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/4/20 12:01:00 [只看该作者]

设置默认就行了。

 

 列属性 -> 默认值 -> date


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/4/20 12:02:00 [只看该作者]

或者在 DataRowAdded 事件里加入代码

 

e.Datarow("日期1") = Date.Today


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


加好友 发短信
等级:小狐 帖子:364 积分:3491 威望:0 精华:0 注册:2012/7/24 7:15:00
  发帖心情 Post By:2014/4/20 12:25:00 [只看该作者]

看来是我没说明白:
   日期1  日期2  
  倒数第二行    2014-04-10   写入:“2014-04-20” 
   新增行   2014-04-20   空着

在表增加一行时,此表倒数第二行的“日期2”列自动填充值“日期1”列新增行的值。

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/4/20 14:36:00 [只看该作者]

 哦,那代码这样写。

 

e.Datarow("日期1") = Date.Today

Dim t As Table = Tables(e.DataTable.Name)

If t.Rows.Count >= 2 Then

    t.Rows(t.Rows.Count - 2)("日期2") = Date.Today

End If


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


加好友 发短信
等级:小狐 帖子:364 积分:3491 威望:0 精华:0 注册:2012/7/24 7:15:00
  发帖心情 Post By:2014/4/20 15:07:00 [只看该作者]

行了,谢谢,非常感谢!

 回到顶部