以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]输入字符串的格式不正确  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=95895)

--  作者:hpyer2007
--  发布时间:2017/2/8 10:07:00
--  [求助]输入字符串的格式不正确
If e.DataCol.Name="合同编码" Then
 e.DataRow("合同金额")=DataTables("合同录入").DataRows("合同金额")
End If
表事件DataColChanged的这段代码有什么错误吗?怎么会有这个错误提示
两个表的合同金额列都是双精度小数型
 
图片点击可在新窗口打开查看此主题相关图片如下:qq截图20170208095959.png
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:qq截图20170208100030.png
图片点击可在新窗口打开查看

--  作者:有点色
--  发布时间:2017/2/8 10:15:00
--  

跨表引用,这样做

 

http://www.foxtable.com/webhelp/scr/1451.htm

 


--  作者:有点色
--  发布时间:2017/2/8 10:18:00
--  
If e.DataCol.Name="合同编码" Then
    Dim fdr As DataRow = DataTables("合同录入").find("合同编号 = \'" & e.DataRow("合同编码") & "\'")
    If fdr IsNot Nothing Then
        e.DataRow("合同金额") = fdr("合同金额")
    Else
        \'e.DataRow("合同金额") = Nothing
    End If
End If