以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  求加入判断:提取"入库表"中,当前行同一客户的"品名规格"的列表项目?  (http://foxtable.com/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
--  
谢谢老师