Foxtable(狐表) → 用户栏目 → 专家坐堂 → TreeView出错


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

主题：TreeView出错
帅哥哟，离线，有人找我吗？
zoyong
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：三尾狐 帖子：664 积分：7862 威望：0 精华：0 注册：2015/8/24 9:02:00 		TreeView出错  发帖心情 Post By：2017/4/10 14:25:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下：无标题.png
图片点击可在新窗口打开查看

错误代码：

.NET Framework 版本：2.0.50727.5485
Foxtable 版本：2017.3.18.1
错误所在事件：窗口,项目收款帐户选择,TreeView1,NodeMouseDoubleClick
详细错误信息：
未将对象引用设置到对象的实例。


nodemousedoubleclick代码：
If e.Node.Level = 0 Then '如果是顶层节点 
    Return '则返回
End If
Dim Vals() As String = e.Node.FullPath.Split("\") 
Dim Filter As String = "[帐户名] = '" & Vals(0) & "' And [开户行] = '" & Vals(1) & "'"
Dim dr As DataRow = DataTables("银行资料").Find(Filter)
Dim r As Row = Tables("项目收款登记").Current
r("帐户名") = dr("帐户名")
r("帐号") = dr("帐号")
r("开户行") = dr("开户行")
e.Form.Close()
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：109505 积分：557193 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2017/4/10 15:25:00 [只看该作者]

If e.Node.Level = 0 Then '如果是顶层节点
    Return '则返回
End If
Dim Vals() As String = e.Node.FullPath.Split("\")
Dim Filter As String = "[帐户名] = '" & Vals(0) & "' And [开户行] = '" & Vals(1) & "'"
Dim dr As DataRow = DataTables("银行资料").Find(Filter)
Dim r As Row = Tables("项目收款登记").Current
If dr Is Nothing OrElse r Is Nothing
    msgbox("没有查询到合适的数据!")
    Return
End If
r("帐户名") = dr("帐户名")
r("帐号") = dr("帐号")
r("开户行") = dr("开户行")
e.Form.Close()
 回到顶部
帅哥哟，离线，有人找我吗？
zoyong
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：三尾狐 帖子：664 积分：7862 威望：0 精华：0 注册：2015/8/24 9:02:00 		  发帖心情 Post By：2017/4/10 16:04:00 [只看该作者]

还是一样的错误

 回到顶部
帅哥哟，离线，有人找我吗？
有点色
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00 		  发帖心情 Post By：2017/4/10 16:07:00 [只看该作者]

 2楼的代码不应该有问题。

 

 弹出【没有查询到合适的数据】了吗？
 回到顶部
帅哥哟，离线，有人找我吗？
zoyong
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：三尾狐 帖子：664 积分：7862 威望：0 精华：0 注册：2015/8/24 9:02:00 		  发帖心情 Post By：2017/4/10 16:33:00 [只看该作者]

软件问题，重新启动就好了，谢谢了有点色

 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04492 秒, 4 次数据查询