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

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]

共有2604人关注过本帖树形打印复制链接主题：[求助]

wumingrong1

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

等级：五尾狐帖子：1029 积分：6497 威望：0 精华：0 注册：2014/1/3 12:49:00

[求助]

Post By：2014/7/10 12:46:00 [只看该作者]

在 DropDownForm 窗口的 AfterLoad 中写有以下命令：

Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")

trv.BuildTree("多项列表项目表","一级条件|二级条件|三级条件","条件列='" & e.Form.Controls("器材类别").Value & "'")

然后在录入窗口输入的时候弹出错误提示；帮我看看究竟问题在哪？

此主题相关图片如下：360截图20140710123353531.jpg

此主题相关图片如下：360截图20140710123420562.jpg

此主题相关图片如下：360截图20140710124127265.jpg

如果我把 "条件列='" & e.Form.Controls("器材类别").Value & "'" 改成 "条件列='防毒面具'"就没问题

Bin

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

等级：贵宾帖子：35433 积分：178524 威望：0 精华：3 注册：2013/3/30 16:36:00

Post By：2014/7/10 14:09:00 [只看该作者]

你是不是搞错窗口了? e.form是指本窗口,你要是在下拉窗口里获取上一个窗口的控件要指定窗口名

fomrs("XX").controls

有点甜

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

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2014/7/10 14:10:00 [只看该作者]

Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")

trv.BuildTree("多项列表项目表","一级条件|二级条件|三级条件","条件列='" & Forms("窗口xxx").Controls("器材类别").Value & "'")

主题：[求助]