以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp) --  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2) ----  [求助]提示未将对象引用到实例  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=87223)

--  作者：lovebc299 --  发布时间：2016/7/6 10:00:00 --  [求助]提示未将对象引用到实例 Dim filter As String filter = "[开始生产]= \'" & False & "\'" If Filter > "" Then     Tables("产期计算_table1").Filter = Filter End If Dim sj As new timespan(0) For Each dr As Row In Tables("产期计算_table1").Rows Dim cp As String = dr("产品") Dim filter1 As String Dim dr1 As DataRow filter1 = "[产品名称] = \'" & cp & "\'" dr1 = DataTables("产品列表").find(filter1) If dr1.Isnull("工序1时间") Then     Dim a As Double = dr1("工序1时间")     Dim sjd As new timespan(a)     sj = sj.Add(sjd)     Else End If Next msgbox(sj.seconds) 代码如下，我的目的是根据产品，在产品列表查找工序时间，然后把时间加起来，计算生产用时，写到这里，测试时提示“未将对象引用到实例”，我把红色部分用‘跳过后就不会出现了。请老师帮我看看哪里有错误。谢谢 下面是打开窗口时的错误提示 .NET Framework 版本：2.0.50727.5485 Foxtable 版本：2016.5.13.1 错误所在事件：窗口,产期计算,AfterLoad 详细错误信息： 未将对象引用设置到对象的实例。

--  作者：大红袍 --  发布时间：2016/7/6 10:03:00 --   If dr1 IsNot Nothing AndAlso dr1.Isnull("工序1时间") Then