以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp) --  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2) ----  请教代码  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=166062)

--  作者：18920118515 --  发布时间：2021/5/17 10:43:00 --  请教代码 ElseIf e.DataCol.Name = "交强险收入" Then     If e.NewValue IsNot Nothing  Then         Dim A1 As  String = e.DataRow("交强险承保公司")         Dim A2 As  DataRow         A2 =  DataTables("设置保险公司").find("[保险公司名称] = \'& A1 &\' ")         If A2 IsNot Nothing             e.DataRow("交强险利润") = e.DataRow("交强险收入") * A2("交强险返点")         End If     Else         e.DataRow("交强险利润") = Nothing     End If 老师，帮我看看代码哪有问题，不计算，您受累给看看

--  作者：有点蓝 --  发布时间：2021/5/17 10:45:00 --   A2 =  DataTables("设置保险公司").find("[保险公司名称] = \'“ & A1 & ”\' ") 多看几遍：http://www.foxtable.com/webhelp/topics/1284.htm

--  作者：18920118515 --  发布时间：2021/5/17 10:51:00 --   谢谢老师