专家坐堂-[求助]在Initialize事件中引用user.Name报错Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]在Initialize事件中引用user.Name报错  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=74841)

--  作者：xxcwdlwgo
--  发布时间：2015/9/20 22:22:00
--  [求助]在Initialize事件中引用user.Name报错
在Initialize事件中引用user.Name报错
Dim dr As DataRow
dr=DataTables("表C").Find("第四列 = \' 张三 \'")
Vars("myjm")=dr("第一列")
Vars("myzd")=dr("第二列")
Vars("myzz")=dr("第三列")
此段代码通过。
但换成user.Name后，运行此代码

Dim dr As DataRow
dr=DataTables("表C").Find("第四列 = \' & user.Name & \'")
Vars("myjm")=dr("第一列")
Vars("myzd")=dr("第二列")
Vars("myzz")=dr("第三列")

报如下错误
.NET Framework 版本：2.0.50727.3053
Foxtable 版本：2014.11.11.1
错误所在事件：项目,Initialize
详细错误信息：
未将对象引用设置到对象的实例。

--  作者：大红袍
--  发布时间：2015/9/20 22:23:00
--

写到AfterOpenProject事件去

--  作者：xxcwdlwgo
--  发布时间：2015/9/20 22:27:00
--
问题同样存在

--  作者：大红袍
--  发布时间：2015/9/20 22:29:00
--

Dim dr As DataRow
dr=DataTables("表C").Find("第四列 = \'" & user.Name & "\'")
If dr IsNot Nothing Then
    Vars("myjm")=dr("第一列")
    Vars("myzd")=dr("第二列")
    Vars("myzz")=dr("第三列")
End If

--  作者：xxcwdlwgo
--  发布时间：2015/9/20 22:34:00
--
谢谢，明白了。