Foxtable(狐表)用户栏目专家坐堂 → [求助]请问这是怎么回事?


  共有10564人关注过本帖树形打印复制链接

主题:[求助]请问这是怎么回事?

帅哥哟,离线,有人找我吗?
huntkey
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:81 积分:636 威望:0 精华:0 注册:2011/4/16 10:01:00
[求助]请问这是怎么回事?  发帖心情 Post By:2011/5/5 21:48:00 [只看该作者]

 

窗口事件:Afterload

Dim tv As WinForm.TreeView =Forms("DepartFrm").Controls("TreeView1")

Dim nd0,nd1,nd2,nd3,nd4,nd5 As WinForm.TreeNode

 

Dim cmd As new sqlcommand

Dim dt As  DataTable

cmd.c

cmd.commandtext="select * from {TDepart} where [id] <> """

dt=cmd.ExecuteReader()

Dim fs As Integer

 

tv.Nodes.Clear   '清空原来的节点::::::::::

For Each dr As DataRow In dt.DataRows

       fs = dr("DLev")

       Select Case fs

           Case 0

                nd0 = tv.Nodes.Add("",dr("Name").trim())

           Case 1

                nd1 = nd0.Nodes.Add("",dr("Name").trim())

           Case 2

                nd2 = nd1.Nodes.Add("",dr("Name").trim())

           Case 3

                nd3 = nd2.Nodes.Add("",dr("Name").trim())

           Case 4

                nd4 = nd3.Nodes.Add("",dr("Name").trim())

           Case 5

                nd5 = nd4.Nodes.Add("",dr("Name").trim())

       End Select

 Next

 

运行后提示如下错误:system.NullReferenceException:Object reference not set to an instance of an object. at UserCode AfterLoad_e09e7967(FormEventArgs e)


 回到顶部
帅哥哟,离线,有人找我吗?
huntkey
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:81 积分:636 威望:0 精华:0 注册:2011/4/16 10:01:00
  发帖心情 Post By:2011/5/5 21:50:00 [只看该作者]

上面有一行代码写错了:

cmd.c

 应该是

cmd.connectionname="MpMg"


 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47448 积分:251048 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/5/5 21:51:00 [只看该作者]

你能确保nd0\nd1\nd2\nd3\nd3\nd5这些变量在使用前已经赋值了吗?

问题基本可以肯定出在这里。


 回到顶部
帅哥哟,离线,有人找我吗?
huntkey
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:81 积分:636 威望:0 精华:0 注册:2011/4/16 10:01:00
  发帖心情 Post By:2011/5/5 22:12:00 [只看该作者]

使用之前没有赋值啊!

 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47448 积分:251048 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/5/5 22:14:00 [只看该作者]

没有赋值,肯定就会出现一楼所说的错误。

 


 回到顶部
帅哥哟,离线,有人找我吗?
huntkey
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:81 积分:636 威望:0 精华:0 注册:2011/4/16 10:01:00
  发帖心情 Post By:2011/5/5 22:40:00 [只看该作者]

这样行吗?

nd0 = tv.Nodes.Add("dr("id"),dr("Name").trim())


 回到顶部
帅哥哟,离线,有人找我吗?
huntkey
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:81 积分:636 威望:0 精华:0 注册:2011/4/16 10:01:00
  发帖心情 Post By:2011/5/5 22:47:00 [只看该作者]

今天没有拷项目文件回来,明天试试看,先谢谢狐狸爸爸

 回到顶部