以文本方式查看主题 -  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp) --  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2) ----  未将对象引用设置到对象的实例，在usercode.test（）  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=165288)

--  作者：gaolei --  发布时间：2021/5/12 16:32:00 --  未将对象引用设置到对象的实例，在usercode.test（） Dim DRS1  As List(OF DataRow)                                                 \'锁定列判断辅助核算是否填写完整 DRS1 = DataTables("续时账模板").Select("[记账参数匹配列] =\'支付工程款\'") Dim A1  As Integer   =DRS1.Count Dim DRS3 As List(OF String) MessageBox.Show(1)    For I As Integer  = 0 To A1-1        If drs1(I)("核算项目1") <> ""            Dim s As String = drs1(I)("核算项目1")          drs3.Add( S )                这行代码定位之后发现有问题，显示未将对象引用设置到对象的实例，在usercode.test（），老师我反复看了好几遍这几句代码没毛病啊，我想知道这个是啥原因呢    End If   Next

--  作者：有点蓝 --  发布时间：2021/5/12 16:36:00 --   Dim DRS3 As new List(OF String)

--  作者：gaolei --  发布时间：2021/5/12 16:38:00 --   吐血，原来这样，谢谢蓝老师