Foxtable(狐表)用户栏目专家坐堂 → 窗口按键 复制新增无效


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

主题:窗口按键 复制新增无效

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


加好友 发短信
等级:三尾狐 帖子:668 积分:7918 威望:0 精华:0 注册:2015/8/24 9:02:00
窗口按键 复制新增无效  发帖心情 Post By:2017/5/7 16:53:00 [只看该作者]

代码

DataTables("投标立项").replacefor("_Locked",True)
Tables("投标立项").save

Dim t As Table = Tables("投标立项")
Dim cr As Row = t.rows(t.Position-1)
Dim nr As Row = t.addNew
nr("区域") = cr("区域")
nr("资质") = cr("资质")
nr("标书组成") = cr("标书组成")
nr("报名日期") = cr("报名日期")
nr("开标时间") = cr("开标时间")



窗口按键    复制新增无效  求解!
现在只复制了控件名   不是控件里面的内容



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


加好友 发短信
等级:三尾狐 帖子:668 积分:7918 威望:0 精华:0 注册:2015/8/24 9:02:00
  发帖心情 Post By:2017/5/7 17:08:00 [只看该作者]

Dim t As Table = Tables("投标立项")
Dim cr As Row = Tables("投标立项").Rows(Tables("投标立项").Rows.Count - 1)
Dim nr As Row = Tables("投标立项").AddNew()
nr("区域") = cr("区域")
nr("资质") = cr("资质")
nr("标书组成") = cr("标书组成")
nr("报名日期") = cr("报名日期")
nr("开标时间") = cr("开标时间")

改成这样可以用    但不是当前行   有点色老师在吗   帮忙看看
我的表是按报名日期排序了   上面的代码永远都是复制最后一行的,我想复制当前行或第一行

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


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

Dim t As Table = Tables("投标立项")
Dim cr As Row = Tables("投标立项").current
Dim nr As Row = Tables("投标立项").AddNew()
nr("区域") = cr("区域")
nr("资质") = cr("资质")
nr("标书组成") = cr("标书组成")
nr("报名日期") = cr("报名日期")
nr("开标时间") = cr("开标时间")

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


加好友 发短信
等级:三尾狐 帖子:668 积分:7918 威望:0 精华:0 注册:2015/8/24 9:02:00
  发帖心情 Post By:2017/5/7 17:11:00 [只看该作者]

我搞定了

 回到顶部