以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]如何清空ComboBox控件框内的内容?(已解决)  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=11286)

--  作者:yyzlxc
--  发布时间:2011/7/16 11:18:00
--  [求助]如何清空ComboBox控件框内的内容?(已解决)

各位老师,有一项目,要求在切换用户时,将ComboBox控件内的原有内容清除掉,代码应该如何写,请各位老师给予指教,谢谢!!

 

补充说明:代码要求放在自定义用户管理的用户登录的确定按钮里!!

[此贴子已经被作者于2011-7-16 14:56:24编辑过]

--  作者:狐狸爸爸
--  发布时间:2011/7/16 11:32:00
--  

用LoadUserSetting事件:

 

if forms("xxx").Opened Then

     Dim cmb As WinForm.ComboBox = e.Form.Controls("ComboBox1")
     cmb.ComboList = ""

end if


--  作者:yyzlxc
--  发布时间:2011/7/16 12:56:00
--  

 

自己解决了,在确定按钮中加了以下代码,达到效果。还是要谢谢狐爸老师的指导,但是觉得在切换用户时,LoadUserSetting事件里面的代码好像不起作用,因为我的项目在LoadUserSetting事件中有隐藏功能区的代码,如果用开发用户组打开项目,再切换其他用户时,不能隐藏相关功能区,这可能与使用自定义用户管理有关?再次谢谢狐爸老师。

 

Dim ls1 As WinForm.ComboBox
Ls1 = Forms("数据载入").Controls("ComboBox1")
ls1.Value = "请选择年月"