Foxtable(狐表)用户栏目专家坐堂 → 请问行隐藏和行冻结


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

主题:请问行隐藏和行冻结

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


加好友 发短信
等级:幼狐 帖子:179 积分:1932 威望:0 精华:0 注册:2020/2/14 18:49:00
请问行隐藏和行冻结  发帖心情 Post By:2020/12/29 15:42:00 [只看该作者]

请问, 如果把某行隐藏或冻结, 还会参与筛选、排序、或输入数值吗?  我的目的是先让某几行不参与数据的处理, 等处理完后,再加进来

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


加好友 发短信
等级:超级版主 帖子:106132 积分:539771 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/12/29 15:52:00 [只看该作者]

怎么隐藏的?

冻结会参与筛选、排序、或输入数值

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


加好友 发短信
等级:幼狐 帖子:179 积分:1932 威望:0 精华:0 注册:2020/2/14 18:49:00
那锁定行可以不?  发帖心情 Post By:2020/12/29 16:09:00 [只看该作者]

那锁定行可以不?

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


加好友 发短信
等级:超级版主 帖子:106132 积分:539771 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/12/29 16:19:00 [只看该作者]

锁定行还会参与筛选、排序,但是不能输入数值

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


加好友 发短信
等级:幼狐 帖子:179 积分:1932 威望:0 精华:0 注册:2020/2/14 18:49:00
请问如何锁定特定行  发帖心情 Post By:2020/12/30 8:55:00 [只看该作者]

请问如何  在学校列   里       随机先两个第一中学的行,进行锁定?
图片点击可在新窗口打开查看此主题相关图片如下:qq浏览器截图20201230085205.jpg
图片点击可在新窗口打开查看

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


加好友 发短信
等级:狐神 帖子:4628 积分:33772 威望:0 精华:0 注册:2008/8/31 22:44:00
  发帖心情 Post By:2020/12/30 9:15:00 [只看该作者]

随机得到两个"_Identify"值,然后锁定

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


加好友 发短信
等级:超级版主 帖子:106132 积分:539771 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/12/30 9:20:00 [只看该作者]

参考:http://www.foxtable.com/webhelp/topics/2963.htm

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


加好友 发短信
等级:幼狐 帖子:179 积分:1932 威望:0 精华:0 注册:2020/2/14 18:49:00
请问命令如何改进  发帖心情 Post By:2020/12/30 9:32:00 [只看该作者]

Dim ids As String
 Dim lst As new List(of String)
 Dim cnt As Integer = DataTables("表A").DataRows.Count
 Do
     Dim Id As Integer = rand.Next(0,cnt)
     id = DataTables("表A").DataRows(id)("_Identify")
     If lst.Contains(id) =False Then
         lst.Add(id)
     End If
     ids = ids & id & ","
 Loop While lst.count < 2   '5是要抽取的行数
 Tables("表A").Filter = "[_Identify] In (" & ids.Trim(",") & ")"

 

我这是在所有行里抽取两个, 我想在学校列里, 行为“第一中学”的,抽取两个, 并锁定行, 请问命令如何加啊


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


加好友 发短信
等级:超级版主 帖子:106132 积分:539771 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/12/30 9:42:00 [只看该作者]

Dim ids As String
Dim lst As new List(of String)
Dim drs As List(Of  DataRow) =  DataTables("表A").Select("学校='第一中学'")
Dim cnt As Integer = drs.Count
Do
    Dim Id As Integer = rand.Next(0,cnt)
    id = drs(id)("_Identify")
    If lst.Contains(id) =False Then
        lst.Add(id)
        drs(id).baserow("_locked") = True
    End If
Loop While lst.count < 2 

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


加好友 发短信
等级:幼狐 帖子:179 积分:1932 威望:0 精华:0 注册:2020/2/14 18:49:00
解锁并反向锁定  发帖心情 Post By:2020/12/30 10:29:00 [只看该作者]

Dim ids As String
Dim lst As new List(of String)
Dim drs As List(Of  DataRow) =  DataTables("表A").Select("学校='第一中学'")
Dim cnt As Integer = drs.Count
Do
    Dim Id As Integer = rand.Next(0,cnt)
    id = drs(id)("_Identify")
    If lst.Contains(id) =False Then
        lst.Add(id)
        drs(id).baserow("_locked") = True
    End If
Loop While lst.count < 5

 

 

请问如何把这5行解锁并把除这5行之外的其它行锁定(反向锁定)。命令如何修改?


 回到顶部
总数 25 1 2 3 下一页