新增文章
文章标题
分类
C#
云星空
K3 BOS
K3 功能
用友
Oracle
python
SQL
MySql
PHP
HTML
script
windows
Access
影视后期
财务
服务
生活
内容
插件中动态对单据头下拉列表赋值 Dim oBill As Object Dim dctTableInfo As KFO.Dictionary Dim sKey As String Dim lCtlIndex As Long '先获取下拉列表控件的Index Set dctTableInfo = m_BillInterface.TableInfo sKey = dctTableInfo("Map")("FComboBox") 'FComboBox为下拉列表的关键字 lCtlIndex = dctTableInfo(sKey)("CtlIndex") '再对控件的下拉列表进行赋值 Set oBill = m_BillInterface.BillCtl Call oBill.SetComboxList(lCtlIndex, "VALUELIST{1=a,2=b,3=c}") '1表示保存值,a表示显示值 m_BillInterface.SetFieldValue "FComboBox", "a", -1 '调用赋值函数赋值 注:由于是动态赋值,在下拉表字段的模板中并不存在保存值与显示值的对应关系,在下次显示单据的时候,需要跟据保存值去动态的显示下拉表值(建议保存值和显示值保持一致) 原文链接:https://vip.kingdee.com/article/46693648759848960?productLineId=7&isKnowledge=2&lang=zh-CN
返回
保存