Foxtable(狐表)用户栏目专家坐堂 → 复制最后一行


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

主题:复制最后一行

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2019/5/22 15:21:00 [显示全部帖子]

 

Dim ColNames As String() = {"供应商_D","供应商_Tel","门店"} '定义一个数组,保存复制列的名称
Dim dr As DataRow = e.DataTable.sqlfind("", "[_Identify] desc") '获得最后一行
For Each ColName As String In ColNames
    e.DataRow(ColName) = dr(ColName) '将最后一行的内容复制到新增行中.
Next

 

[此贴子已经被作者于2019/5/22 15:22:39编辑过]

 回到顶部