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

共有2355人关注过本帖树形打印复制链接主题：取值

有点蓝

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

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

Post By：2021/6/23 16:38:00 [显示全部帖子]

还不如直接使用

Dim cmb As WinForm.ComboBox = e.form.Controls("UserGroup")

cmb.ComboList = "1|2"

有点蓝

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

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

Post By：2021/6/23 16:52:00 [显示全部帖子]

开发者和管理员是内置用户，外部表就不会有这个2个用户的

有点蓝

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

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

Post By：2021/6/23 17:07:00 [显示全部帖子]

if _usergroup = “经理”

cmb.ComboList = DataTables("Users").sqlGetComboListString("Group")

elseif _usergroup = “组管”

cmb.ComboList = DataTables("Users").sqlGetComboListString("Group","Group <> '经理'")

else.......

主题：取值