这种情况，加产品型号是多余的，因为每个产品的产品ID都是唯一的，只需用产品ID作为条件即可。

产品ID是主要的 但是我还想在加上一个条件在代码里如何写进去 请狐爸爸 告诉我一下  这和我的工作所需要的很相似  谢谢了

狐爸爸吃饭回来一定帮我一下 谢谢 

价格条件很简单的，假定原来的条件是：

Dim s As String = "产品id = \'" & dr("产品id") & "\'"

加上产品型号的条件：

Dim s As String = "产品id = \'" & dr("产品id") & "\' And 产品型号 = \'" & dr(产品型号) & "\'"

关于合成表达式，这里有说明：

http://www.foxtable.com/help/topics/1284.htm

If e.DataCol.Name ="入库" Then
    Dim dr,dr1 As DataRow
    dr = e.DataRow
    If dr.isnull("产品id") Then
        MessageBox.Show("产品id不能为空!")
    Else
        Dim s As String = "产品id = \'" & dr("产品id") & "\'And 产品型号 = \'" & dr(产品型号) & "\'"
        dr1= DataTables("仓库").find(s)
        If dr1 IsNot Nothing Then
            Dim val As Integer = dr("生产数量")
            If dr("入库") = False Then
                val = -val
            End If
            dr1("累计入库")+ = val
            dr1.Save()
        Else
            Dim Ls As String() = {"产品ID","产品名称","规格","单位"}
            dr1 = DataTables("仓库").AddNew()
            For Each s In Ls
                dr1(s) = dr(s)
            Next
            dr1("累计入库") = dr("生产数量")
            dr1.Save()
        End If
        dr.Save()
    End If
End If

 我这么写上去之后 显示编辑错未生明名称产品编号

楼主还是老老实实看帮助文件吧，你的产品型号居然是单精度小数型，产品ID一个是字符型，一个是整数型，列类型一错，全部都会错的。

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:查看（yacity作者）库存所增加的问题（问）.rar