Foxtable(狐表)用户栏目专家坐堂 → 通过代码设置此列的值。


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

主题:通过代码设置此列的值。

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


加好友 发短信
等级:幼狐 帖子:149 积分:1884 威望:0 精华:0 注册:2020/1/23 16:11:00
通过代码设置此列的值。  发帖心情 Post By:2020/10/12 8:20:00 [只看该作者]

随机抽取大量记录

如果随机抽取的记录较多,可以考虑增加一个逻辑列,假定逻辑列的名称为“选择”,可以参考下面的代码:

Dim cnt As Integer = DataTables("订单").DataRows.Count
Dim
nds As Integer = 100 '要抽取的记录数
Tables
("订单").StopRedraw()
DataTables
("订单").ReplaceFor("选择",False)
Do

Dim idx As Integer = rand.Next(0,cnt)
Dim dr As DataRow = DataTables("订单").DataRows(idx)
If dr("选择") = False Then
dr("选择") = True
nds = nds - 1
End
If
Loop
While nds > 0
Tables
("订单").Filter = "[选择] = True"
Tables
("订单").ResumeRedraw()

上面的代码从订单表中随机抽取100个订单。
建议逻辑列“选择”采用表达式列,不要给其设置表达式即可,因为:没有设置表达式的表达式列,可以通过代码设置此列的值。

 

 

 

请问:  因为:没有设置表达式的表达式列,可以通过代码设置此列的值。     这句话我没懂, 请问是什么意思啊?

 


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


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

照办就是了。很明白,一开始就设置表达式的内容,以后就改变不了该列的值。

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


加好友 发短信
等级:幼狐 帖子:149 积分:1884 威望:0 精华:0 注册:2020/1/23 16:11:00
  发帖心情 Post By:2020/10/12 8:29:00 [只看该作者]

增加这列表达式能起到什么作用? 请告知

 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

表达式列如果不设置表达式,就可以手工赋值。这里使用表达式列的而不是数据列的原因是这个列的数据不需要保存,而只是临时使用

 回到顶部