以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  我写了如下的筛选赋值代码，但是不执行，不知道代码出什么问题了？  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=68286)
--  作者：狐来江湖
--  发布时间：2015/5/14 9:37:00
--  我写了如下的筛选赋值代码，但是不执行，不知道代码出什么问题了？

代码如下：

Dim drs As List(of DataRow) = DataTables("kcmx").Select("jysl > 0 and txm = \'\'")
For Each dr As DataRow In drs
    Dim spdr As DataRow = DataTables("sp").Find("hh = \'" & dr("hh") & "\'")
    dr("txm") = spdr("txm")
    dr.Save()
Next
--  作者：Bin
--  发布时间：2015/5/14 9:38:00
--  
Dim drs As List(of DataRow) = DataTables("kcmx").Select("jysl > 0 and txm is null")
--  作者：狐来江湖
--  发布时间：2015/5/14 9:49:00
--  

值为空的判断，原来这样用。

谢谢bin老师！