1、可以这样写
Dim wz As Integer = Tables("BOM").FindRow("物料编码 = '" & dr("物料编码") & "'")
2、如果还不行，就是你BOM表被筛选了，导致查找不到值
加好友 
发短信
Post By：2015/9/19 10:40:00 [显示全部帖子]
