| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- ComboBox自定义值问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=140055) |
| -- 作者：落落155 -- 发布时间：2019/8/28 16:07:00 -- ComboBox自定义值问题 3个 ComboBox 控件， 每个控件自定义初始值为“A|B|C” ，当第一个控件选择 A 值后，如何使第二个控件的可选择的值删除A，只剩下Ｂ和Ｃ，第三个控件同上，可供选择的值逐渐减少 或者是否有其他可以实现此功能的控件
|
| -- 作者：有点蓝 -- 发布时间：2019/8/28 16:15:00 -- 参考：http://www.foxtable.com/webhelp/topics/1523.htm 比如： 在第二个控件的Enter事件中加入代码： Dim cmb As WinForm.ComboBox = e.Sender dim cs as string = "A|B|C" Dim str As string = e.Form.Controls("ComboBox1").Value cs = ("|" & cs & "|").replace("|" & str & "|","|").trim("|") cmb.ComboList = DataTables("表A").GetComboListString(cs) |
| -- 作者：落落155 -- 发布时间：2019/8/28 16:35:00 -- 回复：（有点蓝）参考：http://www.foxtable.com/webh... cmb.ComboList = DataTables("表A").GetComboListString(cs) 最后这句不太明白 表A 指的什么，是comboBox控件绑定的表是么
|
| -- 作者：有点蓝 -- 发布时间：2019/8/28 17:41:00 -- 搞错，应该是 Dim cmb As WinForm.ComboBox = e.Sender dim cs as string = "A|B|C" Dim str As string = e.Form.Controls("ComboBox1").Value cs = ("|" & cs & "|").replace("|" & str & "|","|").trim("|") cmb.ComboList = cs |