专家坐堂-多条件Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  多条件  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=29934)

--  作者：wilson
--  发布时间：2013/3/16 22:46:00
--  多条件
Dim dr2 As DataRow In DataTables("库存表").find("名称 = \'" & e.Form.Controls("名称").value & "\' And 颜色 = \' " & e.Form.Controls("颜色").value & " \' AND 规格 = \' " & e.Form.Controls("规格").value & " \'")
If dr IsNot Nothing Then

dr("数量") = dr("数量") + e.Form.Controls("数量").value

end if

当库存表的名称、颜色、规格列与窗口文本框里的名称、颜色、规格一致时，库存表的数量等于数量加e.Form.Controls("数量").value 。

上述代码运行后值错误，求助

谢谢！

--  作者：wilson
--  发布时间：2013/3/16 23:01:00
--
Dim dr2 As DataRow = DataTables("库存表").find("名称 = \'" & e.Form.Controls("名称").value & "\' And 颜色 = \' " & e.Form.Controls("颜色").value & " \' AND 规格 = \' " & e.Form.Controls("规格").value & " \'")
If dr IsNot Nothing Then
dr("数量") = dr("数量") + e.Form.Controls("数量").value
end if

--  作者：wilson
--  发布时间：2013/3/18 21:21:00
--
谢谢你的帮助！是的，在if里的为dr2