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

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 红袍老师，这个什么未将对象引用设置到对象的实例，代码怎么修改？

共有2015人关注过本帖树形打印复制链接主题：红袍老师，这个什么未将对象引用设置到对象的实例，代码怎么修改？

scofields

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

等级：二尾狐帖子：534 积分：4261 威望：0 精华：0 注册：2016/4/17 20:05:00

红袍老师，这个什么未将对象引用设置到对象的实例，代码怎么修改？ 发帖心情

Post By：2016/5/15 22:04:00 [只看该作者]

红袍老师，这段代码写进了LoadUserSetings，发现每次打开项目后，都提示“未将对象引用设置到对象的实例。”，这是怎么回事，我看代码问题也不大啊！

Tables("FAJHB").DataTable.Load()

If User.Group <>"销售开piao" AndAlso User.Group <>"发运地磅" Then

DataTables("JHS").LoadFilter = "客户名 = '" & User.Name & "'"

DataTables("FAJHB").LoadFilter = "客户名 = '" & User.Name & "'"

Else

DataTables("JHS").LoadFilter =""

DataTables("FAJHB").LoadFilter =""

End If

If User.Group <> "发运地磅" Then

Tables("JHS").visible =True

Tables("FAJHB").visible =True

Else

Tables("JHS").visible =False

Tables("FAJHB").visible =True

End If

CurrentTable.DataTable.LoadTop = "100 percent"

大红袍

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

等级：贵宾帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00

Post By：2016/5/15 23:32:00 [只看该作者]

CurrentTable.DataTable.LoadTop = "100 percent"

试试改成

DataTables("FAJHB").LoadTop = "100 percent"

调试程序的方法

主题：红袍老师，这个什么未将对象引用设置到对象的实例，代码怎么修改？