我希望实现双击目录树自动在表格中插入一行并自动填写信息，但是总是报错 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 我希望实现双击目录树自动在表格中插入一行并自动填写信息，但是总是报错

共有2915人关注过本帖树形打印复制链接主题：我希望实现双击目录树自动在表格中插入一行并自动填写信息，但是总是报错

babymio

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

等级：婴狐帖子：6 积分：111 威望：0 精华：0 注册：2021/2/23 17:15:00

我希望实现双击目录树自动在表格中插入一行并自动填写信息，但是总是报错 发帖心情

Post By：2021/3/17 9:48:00 [显示全部帖子]

此主题相关图片如下：微信截图_20210317094425.png

我想要实现，双击目录树的最后一个子节点，在当前已经被目录树筛选过得主表的第一行插入一行，并且在其中3列的位置自动填入目录树三个节点的内容，但是我总是遇到这个弹窗，我找了好多办法都不行，能有人帮我看看这是什么问题导致的吗，我应该怎么修改
图片点击可在新窗口打开查看

此主题相关图片如下：微信截图_20210317094350.png

babymio

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

等级：婴狐帖子：6 积分：111 威望：0 精华：0 注册：2021/2/23 17:15:00

Post By：2021/3/17 10:05:00 [显示全部帖子]

Select Case e.node.Level

Case 0

Case 1

Case 2

Dim r As Row = Tables("发货装箱清单").InsertNew(0)

r("发货日期")= 2021/3/10

r("发货类型")= "空运"

r("产品站点")="G店美国站"

End Select

这是，双击目录树插入行的代码

babymio

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

等级：婴狐帖子：6 积分：111 威望：0 精华：0 注册：2021/2/23 17:15:00

Post By：2021/3/17 12:33:00 [显示全部帖子]

可以了，非常感谢

主题：我希望实现双击目录树自动在表格中插入一行并自动填写信息，但是总是报错