Foxtable(狐表)用户栏目专家坐堂 → 筛选状态中插入行


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

主题:筛选状态中插入行

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


加好友 发短信
等级:九尾狐 帖子:2236 积分:15329 威望:0 精华:0 注册:2015/7/18 10:10:00
筛选状态中插入行  发帖心情 Post By:2017/11/13 16:39:00 [只看该作者]

筛选状态中能否插入行?

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


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

 不可以。

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


加好友 发短信
等级:九尾狐 帖子:2236 积分:15329 威望:0 精华:0 注册:2015/7/18 10:10:00
  发帖心情 Post By:2017/11/14 8:19:00 [只看该作者]

我试了,在窗口中可以插入行,怎么知道插入行的位置呢?

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目14.foxdb


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


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

 不论在哪里,表格在筛选在状态下,表格都不能插入行。你插入行的不是窗口表,而是主表,主表没有筛选。

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


加好友 发短信
等级:九尾狐 帖子:2236 积分:15329 威望:0 精华:0 注册:2015/7/18 10:10:00
  发帖心情 Post By:2017/11/14 8:45:00 [只看该作者]

那怎么能够知道插入的这一行在主表中的位置,然后在这行中写入自己需要的信息?

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


加好友 发短信
等级:超级版主 帖子:109489 积分:557107 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/11/14 9:00:00 [只看该作者]

Dim r As Row = Tables("表A").InsertNew
Output.Show(r.Index)
r("第一列") = xxx
[此贴子已经被作者于2017/11/14 9:00:42编辑过]

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


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

你可以模拟插入行

 

Dim t As Table = Tables("窗口1_Table1")
Dim r As Row = t.Current
Dim dr As DataRow = t.DataTable.addnew()
dr("第一列") = format(Date.Now, "HHmmss")
dr("_sortkey") = r("_sortkey") - 0.01
t.filter = iif(t.filter>"", t.filter & " or _Identify = " & dr("_Identify"), "")
Dim i = t.findrow("_Identify = " & r("_Identify"))
t.position = i


 回到顶部