以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- msgbox (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=87948) |
-- 作者:huhu -- 发布时间:2016/7/23 10:52:00 -- msgbox msgbox(1)----执行了 Dim drs As List(of DataRow) = DataTables("销售出库单列表").Select("邮箱 is null and 业务员 isnot null") msgbox(drs.count)-----没执行 For Each dr As DataRow In drs dr("邮箱") = GetPy(dr("业务员")).Replace(" ","") & "bdcom.com.cn"----没执行 Next msgbox(2)-----没执行 就是找出业务员不为空和邮箱为空的行。怎么就没有弹出msgbox(drs.count)
|
-- 作者:Hyphen -- 发布时间:2016/7/23 10:55:00 -- 试试删除项目里bin目录,重启项目 |
-- 作者:Hyphen -- 发布时间:2016/7/23 10:56:00 -- Dim drs As List(of DataRow) = DataTables("销售出库单列表").Select("邮箱 is null and 业务员 is not null") is和not之间要有空格
|