Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]目录树的一个奇怪问题，请狐爸看看


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

主题：[求助]目录树的一个奇怪问题，请狐爸看看
帅哥哟，离线，有人找我吗？
xiaoqiwei
 小大  1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：三尾狐 帖子：668 积分：8561 威望：0 精华：0 注册：2011/5/5 23:55:00 		[求助]目录树的一个奇怪问题，请狐爸看看  发帖心情 Post By：2014/8/7 16:09:00 [只看该作者]

两段代码，第一段出来的目录树效果出现重复值，第二段代码目录树就是唯一值，请问为何会这样呢？

我先要的效果是：在目录树中按编号排序的显示第一列唯一的数值。请看附件

 

Dim tv As WinForm.TreeView
tv =e.Form.Controls("TreeView1")
tv.BuildTree("表A", "第一列","","编号") '按编号排序

 

 

tv =e.Form.Controls("TreeView2")
tv.BuildTree("表A", "第一列") ' 不排序

 

 
图片点击可在新窗口打开查看此主题相关图片如下：qq图片20140807161053.jpg
图片点击可在新窗口打开查看

 

 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:测试.foxdb


[此贴子已经被作者于2014-8-7 16:12:06编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
有点甜
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：版主 帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00 		  发帖心情 Post By：2014/8/7 16:14:00 [只看该作者]

 正常。

 

 1、你可以把编号列弄成整数列；

 

 2、你编号列中，第一列相同的数据，编号里要么相同，要么连续，这样才能正常。
 回到顶部
帅哥哟，离线，有人找我吗？
xiaoqiwei
 小大  3楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：三尾狐 帖子：668 积分：8561 威望：0 精华：0 注册：2011/5/5 23:55:00 		  发帖心情 Post By：2014/8/7 16:17:00 [只看该作者]

以下是引用有点甜在2014-8-7 16:14:00的发言：

 正常。

 

 1、你可以把编号列弄成整数列；

 

 2、你编号列中，第一列相同的数据，编号里要么相同，要么连续，这样才能正常。

也就是排序的必须要整数列才行咯?
 回到顶部
帅哥哟，离线，有人找我吗？
有点甜
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：版主 帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00 		  发帖心情 Post By：2014/8/7 16:18:00 [只看该作者]

以下是引用xiaoqiwei在2014-8-7 16:17:00的发言：

也就是排序的必须要整数列才行咯?

 

不是，是必须相同或者连续，才行。
 回到顶部
帅哥哟，离线，有人找我吗？
xiaoqiwei
 小大  5楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：三尾狐 帖子：668 积分：8561 威望：0 精华：0 注册：2011/5/5 23:55:00 		  发帖心情 Post By：2014/8/7 16:19:00 [只看该作者]

但是我的编号列都是递增的
 回到顶部
帅哥哟，离线，有人找我吗？
有点甜
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：版主 帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00 		  发帖心情 Post By：2014/8/7 16:21:00 [只看该作者]

 那就弄成整数列。字符的排序不是你看到那样的。

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


加好友 发短信
等级：版主 帖子：5246 积分：33163 威望：0 精华：8 注册：2013/1/17 21:28:00 		  发帖心情 Post By：2014/8/7 16:24:00 [只看该作者]

不排序，实际上是按生成列排序：

下面的两段代码，效果就一样。

Dim tv As WinForm.TreeView = e.Form.Controls("TreeView1")
tv.BuildTree("订单", "产品|客户","","产品,客户")  

 

Dim tv As WinForm.TreeView = e.Form.Controls("TreeView1")
tv.BuildTree("订单", "产品|客户")

[此贴子已经被作者于2014-8-7 16:24:11编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
lsy
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：版主 帖子：5246 积分：33163 威望：0 精华：8 注册：2013/1/17 21:28:00 		  发帖心情 Post By：2014/8/7 16:30:00 [只看该作者]

数字字符，前面补齐0：

01

02

......

29

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


加好友 发短信
等级：三尾狐 帖子：668 积分：8561 威望：0 精华：0 注册：2011/5/5 23:55:00 		  发帖心情 Post By：2014/8/7 16:31:00 [只看该作者]

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