以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  请教提示错误的原因  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=16495)
--  作者：flytianr
--  发布时间：2012/2/16 0:54:00
--  请教提示错误的原因
在附件里，车辆进销表中的利息情况部分，我用prepareedit和datacolchanged事件分别对付款方式与利率两个字段进行了设置，目的是根据付款方式与请款日期从融资渠道表中取出对应的利率值，应该说通过编代码这个功能是实现了，但出现一个问题，当我试图删掉付款方式字段的值时，会提示一个错误框提示说“未将对象引用设置到对象的实例”，看不大明白，不知道问题是出在了哪，请各位老师帮助指正，谢谢
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.table
--  作者：狐狸爸爸
--  发布时间：2012/2/16 7:56:00
--  

应该是：

 

If e.DataCol.name="利息情况_付款方式" Then
    Dim a As DataRow = DataTables("融资渠道").Find("[融资形式]=\'" & e.newvalue & "\' and [利率调整日期] < = \'" & e.DataRow("车辆基本信息_请款日期") & "\' and [利息调整终止日期] > =  \'" & e.DataRow("车辆基本信息_请款日期") & "\'")
    If a IsNot Nothing Then
        e.DataRow("利息情况_利率")=a("现行利率")
    End If
End If

 

理由参考：

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