Foxtable(狐表) → 用户栏目 → 专家坐堂 → 如何判断viewtree没有任何节点被选中了 【ok了】


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

主题：如何判断viewtree没有任何节点被选中了 【ok了】
帅哥哟，离线，有人找我吗？
mr725
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级：MVP荣誉狐 帖子：5154 积分：31434 威望：0 精华：8 注册：2008/9/8 12:27:00 		如何判断viewtree没有任何节点被选中了 【ok了】  发帖心情 Post By：2010/4/5 20:11:00 [显示全部帖子]

刚打开目录树窗口时，就是这样的，没有被选中的节点。怎样判断这种情况？
[此贴子已经被作者于2010-4-6 0:07:13编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
mr725
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级：MVP荣誉狐 帖子：5154 积分：31434 威望：0 精华：8 注册：2008/9/8 12:27:00 		  发帖心情 Post By：2010/4/5 20:16:00 [显示全部帖子]

或者说： 如何判断还没有加载目录树，即viewtree里面是空的？
[此贴子已经被作者于2010-4-5 20:16:18编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
mr725
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级：MVP荣誉狐 帖子：5154 积分：31434 威望：0 精华：8 注册：2008/9/8 12:27:00 		  发帖心情 Post By：2010/4/5 20:48:00 [显示全部帖子]

以下是引用易狐在2010-4-5 20:44:00的发言：


我感觉多此一举，判断是否加载？何不直接加载一次ok！

人人感觉不同啊，有这个需求就提出来嘛～  ，很有必要的。出现这个提示能说多此一举吗？  呵呵～


图片点击可在新窗口打开查看此主题相关图片如下：未命名.jpg
图片点击可在新窗口打开查看
[此贴子已经被作者于2010-4-5 20:50:55编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
mr725
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级：MVP荣誉狐 帖子：5154 积分：31434 威望：0 精华：8 注册：2008/9/8 12:27:00 		  发帖心情 Post By：2010/4/5 20:54:00 [显示全部帖子]

以下是引用狐狸爸爸在2010-4-5 20:47:00的发言：
 Dim tr As WinForm.TreeView
 Dim nd As WinForm.TreeNode
 tr = e.Form.Controls("TreeView1")
 nd = tr.SelectedNode
 If nd IsNot Nothing Then
     nd = nd.Nodes.Add("新节点","新节点")
     tr.SelectedNode = nd
     tr.Select
     tr.BeginEdit
 End If

提示错误》 错误代码：tr.BeginEdit


图片点击可在新窗口打开查看此主题相关图片如下：未命名+.jpg
图片点击可在新窗口打开查看
[此贴子已经被作者于2010-4-5 20:59:23编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
mr725
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级：MVP荣誉狐 帖子：5154 积分：31434 威望：0 精华：8 注册：2008/9/8 12:27:00 		  发帖心情 Post By：2010/4/5 21:18:00 [显示全部帖子]

以下是引用狐狸爸爸在2010-4-5 21:02:00的发言：
 多余的删除，保留你需要的。

还是提示5楼的错误～


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


加好友 发短信 一级勋章
等级：MVP荣誉狐 帖子：5154 积分：31434 威望：0 精华：8 注册：2008/9/8 12:27:00 		  发帖心情 Post By：2010/4/5 21:26:00 [显示全部帖子]

以下是引用易狐在2010-4-5 21:22:00的发言：
人家是让您就保留到您的判断部分就可以了：

Dim tr As WinForm.TreeView
 Dim nd As WinForm.TreeNode
 tr = e.Form.Controls("TreeView1")
 nd = tr.SelectedNode
 If nd IsNot Nothing Then
      ......
 End If

这个我还不知吗？大哥呀， 没有选中任何节点时，或空目录树的情况下都提示错误啊～  看5楼贴图。

不好意思多试两次又没有任何提示了。。。 图片点击可在新窗口打开查看

[此贴子已经被作者于2010-4-5 21:37:10编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
mr725
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级：MVP荣誉狐 帖子：5154 积分：31434 威望：0 精华：8 注册：2008/9/8 12:27:00 		  发帖心情 Post By：2010/4/5 21:50:00 [显示全部帖子]

但是还是不能做任何事情，因为没有选中任何节点时，或空目录树的情况下 nd = tr.SelectedNode没有意义啊～ 

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


加好友 发短信 一级勋章
等级：MVP荣誉狐 帖子：5154 积分：31434 威望：0 精华：8 注册：2008/9/8 12:27:00 		  发帖心情 Post By：2010/4/5 22:21:00 [显示全部帖子]

看来时我的问题啦～ 
[此贴子已经被作者于2010-4-5 22:23:56编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
mr725
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级：MVP荣誉狐 帖子：5154 积分：31434 威望：0 精华：8 注册：2008/9/8 12:27:00 		  发帖心情 Post By：2010/4/5 22:40:00 [显示全部帖子]

以下是引用reachtone在2010-4-5 22:24:00的发言：

必须判断的,否则会出错。我碰到过类似的问题，我之前的处理方式，是先选中TreeView，然后再执行代码。
用老六的判断SelectedNode是否为空，这种方式更好。

自己做了：  不知道对否？
Dim tr As WinForm.TreeView
Dim nd As WinForm.TreeNode
tr = Forms("主窗口").Controls("TreeView1")
tr.select()
nd = tr.SelectedNode
If nd Is Nothing Then
    return "< 没有节点！或没有选中节点>"
end if

[此贴子已经被作者于2010-4-5 22:45:04编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
mr725
 小大  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级：MVP荣誉狐 帖子：5154 积分：31434 威望：0 精华：8 注册：2008/9/8 12:27:00 		  发帖心情 Post By：2010/4/5 22:49:00 [显示全部帖子]

出错原因好像是给变量赋值（tr.SelectedNode.text）时造成的，代码多了一时记不起来了，再说引用tr.SelectedNode.text 也是很正常的，这时就要判断是否有节点或节点是否被选中了，而不是无需判断···～～～
谢谢大家了。

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