[求助]目录树的一个奇怪问题，请狐爸看看 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

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

共有3600人关注过本帖树形打印复制链接主题：[求助]目录树的一个奇怪问题，请狐爸看看

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：

......

xiaoqiwei

小大 9楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：三尾狐帖子：668 积分：8561 威望：0 精华：0 注册：2011/5/5 23:55:00

Post By：2014/8/7 16:31:00 [只看该作者]

明白！已处理好！谢谢

下一主题 >> << 上一主题

主题：[求助]目录树的一个奇怪问题，请狐爸看看