以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]关于在集合中增加数据，老是出错！  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=72926)
--  作者：hotday1972
--  发布时间：2015/8/8 19:36:00
--  [求助]关于在集合中增加数据，老是出错！

Dim drs As List(Of DataRow)
Dim lst1 As New List(Of String)
drs = DataTables("失效模式清单").Select("[失效源件] = \'" & Tables("失效模式清单").Current("失效源件") & "\'" )
If drs.Count > 0 Then
    For Each dr As DataRow In drs
        If dr.IsNull("模式序号") = False Then                       
            lst1.Add(CStr(dr("模式序号")))
        End If
    Next

End If

 

红色的这句代码出错，出错信息：

.NET Framework 版本：2.0.50727.5485
Foxtable 版本：2014.11.11.1
错误所在事件：窗口,失效模式维护,生成1,Click
详细错误信息：
未将对象引用设置到对象的实例。

 

求助，谢谢！

[此贴子已经被作者于2015/8/8 19:38:45编辑过]
--  作者：hotday1972
--  发布时间：2015/8/8 19:38:00
--  
知道问题了，太粗心了。