以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 插件不允许编辑 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=185239) |
-- 作者:hopestarxia -- 发布时间:2023/2/12 20:59:00 -- 插件不允许编辑 老师,我想根据插件ComboBox1 的值判断插件 NumericComboBox1 是否允许编辑,请问代码怎么修改? 例 值等于A 时,不允许修改,其他值可以编辑;
Dim jsbz As WinForm.ComboBox = e.Form.Controls("ComboBox1") If jsbz.text = "A" Then e.Form.Controls("NumericComboBox1").Cancel = True Else e.Form.Controls("NumericComboBox1").Cancel = False End If |
-- 作者:有点蓝 -- 发布时间:2023/2/12 21:01:00 -- 参考:http://www.foxtable.com/webhelp/topics/2342.htm If jsbz.text = "A" Then e.Form.Controls("NumericComboBox1").ReadOnly = BooleanEnum.True Else e.Form.Controls("NumericComboBox1").ReadOnly = BooleanEnum.False End If |
-- 作者:hopestarxia -- 发布时间:2023/2/12 21:07:00 -- 谢谢老师! |