以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  求加入判断：提取"入库表"中，当前行同一客户的"品名规格"的列表项目？  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=134101)
--  作者：fengwenliuyan
--  发布时间：2019/4/27 16:26:00
--  求加入判断：提取"入库表"中，当前行同一客户的"品名规格"的列表项目？

If MainTable.Name = "入库表" Then
    Tables("入库表").Cols("品名规格").Combolist = DataTables("入库表").GetComboListString("品名规格")
End If

已知以上代码是：
从"入库表"提取"品名规格"，作为"入库表"中"品名规格"的列表项目，

求加入判断：提取"入库表"中，当前行同一客户的"品名规格"的列表项目？
--  作者：fengwenliuyan
--  发布时间：2019/4/27 16:55:00
--  
求帮助
--  作者：有点蓝
--  发布时间：2019/4/27 17:09:00
--  
这种用法

如果某列的列表项目不仅来自于另一个表，而且要根据其它列已经输入的内容来决定显示哪些条目，那么这样的代码就只能设置在表事件PrepareEdit中。

例如：

If e.IsFocusCell Then \'如果是焦点所在单元格
    If e.Col.Name = "县市" Then \'如果正在编辑的是县市列
        \'从行政区域表提取该省市的县市作为列表项目
        e.Col.Combolist = DataTables("行政区域").GetComboListString("县市", "[省市] = \'" & e.Row("省市") & "\'") 
    End If
End If
--  作者：fengwenliuyan
--  发布时间：2019/4/27 17:15:00
--  
谢谢老师