Foxtable(狐表)用户栏目专家坐堂 → 删除时间日期列:今天之前的日期


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

主题:删除时间日期列:今天之前的日期

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


加好友 发短信
等级:七尾狐 帖子:1553 积分:11003 威望:0 精华:0 注册:2016/9/12 11:18:00
删除时间日期列:今天之前的日期  发帖心情 Post By:2016/10/25 20:45:00 [只看该作者]

表,在没有增加行、删除行、编辑行,等几乎无任何操作。

怎么样判断,并删除

时间日期列:今天之前的日期

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


加好友 发短信
等级:超级版主 帖子:110544 积分:562604 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2016/10/25 20:50:00 [只看该作者]

是想删除这列的数据还是想删除符合条件的行

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


加好友 发短信
等级:七尾狐 帖子:1553 积分:11003 威望:0 精华:0 注册:2016/9/12 11:18:00
  发帖心情 Post By:2016/10/25 23:56:00 [只看该作者]

删除日期列符合条件一个单元格

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


加好友 发短信
等级:超级版主 帖子:110544 积分:562604 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2016/10/26 8:51:00 [只看该作者]

Dim dr As DataRow
dr = DataTables("产品").Find("日期 < '" & Date.Today & "'") 
If dr IsNot Nothing Then
    dr("日期") = Nothing
End If

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


加好友 发短信
等级:七尾狐 帖子:1553 积分:11003 威望:0 精华:0 注册:2016/9/12 11:18:00
  发帖心情 Post By:2016/10/26 10:00:00 [只看该作者]

在什么事件内写入这段代码呢?这是我发愁的,因为是对已有行进行条件判断,要删除日期的这一行,不会有什么操作行为
(例如,我要删除图中红框单元格内的日期,我希望,超过这一天就删除这个日期,不用手动操作)
[此贴子已经被作者于2016/10/26 10:04:54编辑过]

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


加好友 发短信
等级:超级版主 帖子:110544 积分:562604 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2016/10/26 10:04:00 [只看该作者]

这样没有触发表事件,只能用按钮操作

 回到顶部