- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 条件表达式根据其他列筛选下拉内容，要怎么写？ (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=195608)
-- 发布时间：2025/2/21 9:26:00
-- 条件表达式根据其他列筛选下拉内容，要怎么写？
这里后边本表的列名，怎么填呢？
-- 发布时间：2025/2/21 10:01:00
--
没看懂，要做什么筛选？请详细说明
-- 发布时间：2025/2/21 10:02:00
--
按员工表中，部门名称等于本表当前行的部门名称，来选择这个部门的员工，要怎么写
-- 发布时间：2025/2/21 10:03:00
--
把其他部门的过滤掉
-- 发布时间：2025/2/21 10:04:00
--
在维修人员这列下拉选择本部门员工
-- 发布时间：2025/2/21 10:12:00
--
这种要使用点处理：http://www.foxtable.com/webhelp/topics/2653.htm，
代码放到AfterSelChange事件
-- 发布时间：2025/2/21 10:14:00
--
If e.OldRange.RowSel <> e.NewRange.RowSel \'如果选择的是不同的行
If e.OldRange.RowSel >= 0 AndAlso e.OldRange.Rowsel < e.Table.Rows.Count Then \'而且原来选择的是一个有效的数据行
Dim r As Row = e.Table.Rows(e.NewRange.Rowsel) \'获得新选择的行
Dim dmp As New TableDataMap
dmp.DataTable = "客户" \'指定数据来源表
dmp.ValueCol = "ID" \'指定取值列
dmp.DisplayCol = "公司" \'指定显示列
\'指定下拉列表时显示哪些列的数据
dmp.ListCols = "ID,公司,姓氏"
dmp.Sort = "城市" \'指定排序方式
dmp.filter = "部门名称=\'" & r("部门名称") & "\' "
e.Table.Cols("维修人员").DataMap = dmp.CreateDataMap() \'生成并设置DataMap
End If
End If
End If
End If
-- 发布时间：2025/2/21 10:17:00
--
好的