Foxtable(狐表)用户栏目专家坐堂 → [求助]如何简化重置列代码的写法(已解决)?


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

主题:[求助]如何简化重置列代码的写法(已解决)?

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


加好友 发短信
等级:童狐 帖子:272 积分:2125 威望:0 精华:0 注册:2018/8/13 9:55:00
[求助]如何简化重置列代码的写法(已解决)?  发帖心情 Post By:2018/11/26 10:25:00 [只看该作者]

各位老师前辈,请教一个问题,如果简化下面这段重置列代码的写法呢,一个表的多个字段需要重置,这样写能运行,但是有点累赘了,请教一下简化的写法,多谢了?

DataTables("面试管理_table1").Datacols("预约状态").RaiseDataColChanged
DataTables("面试管理_table1").Datacols("赴约状态").RaiseDataColChanged
DataTables("面试管理_table1").Datacols("预约通知").RaiseDataColChanged
DataTables("面试管理_table1").Datacols("预约次数").RaiseDataColChanged
DataTables("面试管理_table1").Datacols("面试结果告知").RaiseDataColChanged
DataTables("面试管理_table1").Datacols("面试进度").RaiseDataColChanged
DataTables("面试管理_table1").Datacols("面试评级").RaiseDataColChanged
DataTables("面试管理_table1").Datacols("试用建议").RaiseDataColChanged
DataTables("面试管理_table1").Datacols("面试次数").RaiseDataColChanged
[此贴子已经被作者于2018/11/26 12:13:54编辑过]

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


加好友 发短信
等级:小狐 帖子:344 积分:4290 威望:0 精华:0 注册:2016/11/17 9:49:00
  发帖心情 Post By:2018/11/26 10:42:00 [只看该作者]

用with

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


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

比如

 

Dim cs() As String = {"第一列", "第二列"}
For Each c As String In cs
    DataTables("面试管理_table1").Datacols(c).RaiseDataColChanged
Next


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


加好友 发短信
等级:童狐 帖子:272 积分:2125 威望:0 精华:0 注册:2018/8/13 9:55:00
  发帖心情 Post By:2018/11/26 12:14:00 [只看该作者]

代码好用,多谢老师!

 回到顶部