[求助]关于根据单元格不同的内容调用不同列 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

If e.DataCol.Name = "产品编码" Then
    Dim dr As DataRow
    dr = DataTables("产品目录").Find("产品编码= '" & e.DataRow("产品编码") & "'" )
    If dr IsNot Nothing
        e.DataRow("剂型")= dr("剂型")
        e.DataRow("产品名称_通用名")= dr("产品名称_通用名")
        e.DataRow("产品名称_商品名")= dr("产品名称_商品名")
        e.DataRow("包装规格")=dr("包装规格")
        dr = DataTables("客户价目表").Find("产品编码= '" & e.DataRow("产品编码") & "' and 客户 = '" & e.DataRow("客户") & "'" )
        If dr IsNot Nothing
            e.DataRow("价格")= dr("价格" )
        End If
    Else
        e.DataRow("剂型")= Nothing
        e.DataRow("产品名称_通用名")= Nothing
        e.DataRow("产品名称_商品名")= Nothing
        e.DataRow("价格")= Nothing
        e.DataRow("包装规格")=Nothing
        e.DataRow("数量")=Nothing
    End If
End If

主题：[求助]关于根据单元格不同的内容调用不同列