未将对象引用设置到对象的实例 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 未将对象引用设置到对象的实例

共有2689人关注过本帖树形打印复制链接主题：未将对象引用设置到对象的实例

gaolei

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：幼狐帖子：69 积分：618 威望：0 精华：0 注册：2017/11/2 13:49:00

未将对象引用设置到对象的实例 发帖心情

Post By：2021/5/11 18:18:00 [显示全部帖子]

Dim DRS1 As List(OF DataRow) '锁定列判断辅助核算是否填写完整

DRS1 = DataTables("续时账模板").Select("[记账参数匹配列] ='"& E.DataRow("摘要") &"'")

Dim A1 As Integer =DRS1.Count

Dim DRS3 As List(OF String)

MessageBox.Show(1)

For I = 0 To A1-1

If drs1(I)("核算项目1") <> "" And drs3.Contains(drs1(I)("核算项目1")) = False

DRS3.Add(drs1(I)("核算项目1") )

End If

MessageBox.Show(2)

老师，这段代码老是显示“未将对象引用设置到对象的实例。”是啥情况啊

gaolei

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：幼狐帖子：69 积分：618 威望：0 精华：0 注册：2017/11/2 13:49:00

Post By：2021/5/12 10:43:00 [显示全部帖子]

老师，不是的，有三列，我是想从三列里面提取不重复的值，你刚才写的只能从一列里面提取不重复值啊

gaolei

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：幼狐帖子：69 积分：618 威望：0 精华：0 注册：2017/11/2 13:49:00

Post By：2021/5/12 11:03:00 [显示全部帖子]

这个厉害，这个厉害，看帮助文档的时候忽略掉了，谢谢老师

主题：未将对象引用设置到对象的实例