以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]随机抽取表达式  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=134896)
--  作者：liuyixin662
--  发布时间：2019/5/12 7:20:00
--  [求助]随机抽取表达式

老师你好,帮助中有段随机抽取行的代码,现增加个条件:列A=B时,表达式怎样修改

For i As Integer = 0 To 100 - 1 \'100为要抽取的行数
    DataTables("订单").DataRows(ids2(i))("选择") = True

                            增加个列A=B的条件
Next
谢谢老师
--  作者：rjh4078
--  发布时间：2019/5/12 8:40:00
--  
test
--  作者：liuyixin662
--  发布时间：2019/5/12 9:41:00
--  
tes什么意思
--  作者：liuyixin662
--  发布时间：2019/5/12 15:04:00
--  
以下是引用liuyixin662在2019/5/12 7:20:00的发言：

老师你好,帮助中有段随机抽取行的代码,现增加个条件:列A=B时,表达式怎样修改

For i As Integer = 0 To 100 - 1 \'100为要抽取的行数
    DataTables("订单").DataRows(ids2(i))("选择") = True

                            增加个列A=B的条件
Next
谢谢老师

 

求助老师,指点一下
--  作者：有点甜
--  发布时间：2019/5/12 21:26:00
--  

先select得到对应的行

 

Dim drs = datatables("表A").select("第一列=\'123\'")

 

然后，之后的代码，直接用drs，不要用datarows，即可。