以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 未将对象引用设置到对象的实例,在usercode.test() (http://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 -- 吐血,原来这样,谢谢蓝老师 |