以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp) --  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2) ----  [求助] 不会写代码,请教  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=43857)

--  作者：zyys2813 --  发布时间：2013/12/17 15:31:00 --  [求助] 不会写代码,请教 Dim lqdw As WinForm.ComboBox = e.Form.Controls("领取单位") lqdw.ComboList = DataTables("关联单位").GetComboListString("单位名称") Dim lqr As WinForm.ComboBox = e.Form.Controls("领取人") lqr.ComboList = DataTables("关联单位").GetComboListString("单位人员","[单位名称] =  ???? ") 请问红色的????部分怎么写? 就是选择了"领取单位"后 列出该"领取单位"的"领取人"名单

--  作者：Bin --  发布时间：2013/12/17 15:35:00 --   Dim lqdw As WinForm.ComboBox = e.Form.Controls("领取单位") lqdw.ComboList = DataTables("关联单位").GetComboListString("单位名称") -----以下代码不应该写在同一个地方,而是应该写在 领取单位这个ComboBox的Textchanged事件里.------ Dim lqr As WinForm.ComboBox = e.Form.Controls("领取人") lqr.ComboList = DataTables("关联单位").GetComboListString("单位人员","[单位名称] =  \'" & e.Form.Controls("领取单位").Text & "\' ")

--  作者：zyys2813 --  发布时间：2013/12/17 15:40:00 --  太感谢您了 太感谢您了