打开窗口加载树报错 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 打开窗口加载树报错

共有3699人关注过本帖树形打印复制链接主题：打开窗口加载树报错

ycs5801

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

加好友

发短信

等级：五尾狐帖子：1065 积分：7598 威望：0 精华：0 注册：2009/6/24 9:44:00

打开窗口加载树报错 发帖心情

Post By：2023/3/27 12:34:00 [显示全部帖子]

此主题相关图片如下：22.png

Tables("主表").Sort = "时间"

Tables("主表.操作表").Sort = "次数"

''If User.Type <> UserTypeEnum.Developer

If User.name = "操作员" Then

Forms("主表").Controls("SplitContainer1").Panel1.Collapsed = True

Forms("主表").Controls("SplitContainer2").Panel1.Collapsed = True

End If

Dim trv As WinForm.LoadTree = e.Form.Controls("LoadTree1")

trv.Build(Tables("主表"),"日期 YM",10,True)

以上是窗口的afterload中的代码，打开窗口报错，如图。

ycs5801

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

加好友

发短信

等级：五尾狐帖子：1065 积分：7598 威望：0 精华：0 注册：2009/6/24 9:44:00

Post By：2023/3/27 14:00:00 [显示全部帖子]

我是想用这个自动打开：

示例5

在分页加载的时候，如果将第四个参数设置为True，打开加载树之后，会自动加载第一页数据，例如：

Tables("订单").OpenLoadTree("产品|客户",120,50,True)

表示每页50行，打开加载树后，自动加载第一页数据。

ycs5801

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

加好友

发短信

等级：五尾狐帖子：1065 积分：7598 威望：0 精华：0 注册：2009/6/24 9:44:00

Post By：2023/3/27 14:37:00 [显示全部帖子]

我现在是想实现加载树，trv.Build(Tables("主表"),"日期 YM",10,True)，打开之后自动打开最新月份的数据，怎么实现呢？

ycs5801

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

加好友

发短信

等级：五尾狐帖子：1065 积分：7598 威望：0 精华：0 注册：2009/6/24 9:44:00

Post By：2023/3/27 15:10:00 [显示全部帖子]

我这个加载树是在窗口里边的，现在设置了窗口加载后执行的代码，无法使用这个吧？

Dim trv As WinForm.LoadTree = e.Form.Controls("LoadTree1")

trv.Build(Tables("主表"), "日期 YM", 10, 20, True)

这样会报错。

ycs5801

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

加好友

发短信

等级：五尾狐帖子：1065 积分：7598 威望：0 精华：0 注册：2009/6/24 9:44:00

Post By：2023/3/27 15:32:00 [显示全部帖子]

Dim trv As WinForm.LoadTree = e.Form.Controls("LoadTree1")
trv.Build(Tables("主表"), "日期 YM", 10)

DataTables("主表").LoadPage = "0"
DataTables("主表").LoadOrder = "日期 Desc"
DataTables("主表").Load

Tables("主表").Sort = "时间"
Tables("主表.操作表").Sort = "次数"

改成这样可以了，谢谢。

ycs5801

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

加好友

发短信

等级：五尾狐帖子：1065 积分：7598 威望：0 精华：0 注册：2009/6/24 9:44:00

Post By：2023/3/27 15:41:00 [显示全部帖子]

还是不行，打开初始页面时候，表内无数据，怎样能显示第一页数据？

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

主题：打开窗口加载树报错