- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 求助，帮忙看下这段代码有什么问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=29261)
-- 发布时间：2013/3/3 15:51:00
-- 求助，帮忙看下这段代码有什么问题
For Each mr As DataRow In DataTables("订单表").DataRows
Dim vr As DataRow = DataTables("订单主表").Find("订单号 = \'" & mr("订单号") & "\'")
If mr("未交数")> 0 Then
flag = False
msgbox(mr("未交数"))
msgbox(flag)
Exit For
End If
vr("结案") = Flag
Next
用msgbox看到的值是正确显示的，可是
vr("结案") 不能正确的和Flag的值匹配
附例子，求指点
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:库存演算.foxdb |
-- 发布时间：2013/3/3 15:58:00
--
不是测试版的，打不开。
你一到flag = false 就跳到Next后面去了，与vr不相干啦。
[此贴子已经被作者于2013-3-3 16:03:35编辑过]
-- 发布时间：2013/3/3 16:01:00
--
还是谢谢
-- 发布时间：2013/3/3 20:48:00
--
顶起。。。
-- 发布时间：2013/3/3 22:54:00
--
问题自己搞定了，自己的思路有问题，换了个统计的方法