可通用下拉目录树 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 可通用下拉目录树

共有1859人关注过本帖树形打印复制链接主题：可通用下拉目录树

有点蓝

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

等级：超级版主帖子：109427 积分：556791 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2023/11/10 13:39:00 [显示全部帖子]

e.Form.DropDownBox.value = dr("邮编")

有点蓝

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

等级：超级版主帖子：109427 积分：556791 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2023/11/10 14:46:00 [显示全部帖子]

全错。prepareedit事件

if e.col.name = "加工人" then

if e.row("外协") then

e.col.DropForm = "外协"

else

e.col.DropForm = "本公司"

end if

有点蓝

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

等级：超级版主帖子：109427 积分：556791 威望：0 精华：9 注册：2015/6/24 9:21:00

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

单分支形式：

If 条件表达式 Then
代码
End If

如果条件表达式的计算结果为True，也就是条件成立的话，则执行代码。
例如在命令窗口输入下面的代码：

如果勾选了，那么e.Row("外协")的值就是true，符合条件【If true Then】。

【If e.Row("外协") = True Then】其实等于【If true = True Then】，也就是等于【If true Then】

主题：可通用下拉目录树