主题：一种价格表

1、你的图片，别人看不到，图片你需要上传，别人才能看得见。

2、参考：

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

 

 

直接上传table文件，具体说明问题。

没有文件，只能有大概的代码：

 

Select Case e.DataCol.Name

     Case "施工单位","等级强度","浇筑方式"

         Dim dr As DataRow = DataTables("价格表").Find("施工单位 = '" & e.DataRow("施工单位") & “‘”)

         if dr isnot nothing Then

              Dim nm As String = e.DataRow("等级强度") & "_" & e.DataRow("浇筑方式")

              if DataTables.DataCols.Contains(nm) then

                  e.DataRow("价格") = dr(nm)

              end if

         end if

End Select

 

如果搞不定，请上传文件，明天上班我们帮你设置一下。

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

点击浏览该文件:发料管理.table