[求助]新增行弹出错误窗口 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]新增行弹出错误窗口

共有1599人关注过本帖树形打印复制链接主题：[求助]新增行弹出错误窗口

elfing

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

加好友

发短信

等级：幼狐帖子：90 积分：1202 威望：0 精华：0 注册：2015/4/25 9:42:00

[求助]新增行弹出错误窗口 发帖心情

Post By：2017/8/14 11:17:00 [显示全部帖子]

今天新建了一个分页加载流水账的窗口，但是新增行的时候总是弹出窗口的Afterload错误，把相关代码发上来请教一下有什么问题吗？谢谢

If user.roles = "库存审核" Then
Dim dt As Date = Date.Today.AddMonths(-2)
DataTables("原材料").loadFilter = "日期 > '" & dt & "'"
DataTables("原材料").load()
Tables("原材料").OpenFilterTree("规格")
ElseIf user.roles = "超级用户" Then
Tables("原材料").OpenLoadTree("规格|日期 DESC",150,20,True)
Else
e.Cancel = True
End If