Foxtable(狐表)用户栏目专家坐堂 → [求助]如何清空ComboBox控件框内的内容?(已解决)


  共有13957人关注过本帖树形打印复制链接

主题:[求助]如何清空ComboBox控件框内的内容?(已解决)

帅哥哟,离线,有人找我吗?
yyzlxc
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1528 积分:10618 威望:0 精华:0 注册:2008/9/24 11:16:00
[求助]如何清空ComboBox控件框内的内容?(已解决)  发帖心情 Post By:2011/7/16 11:18:00 [只看该作者]

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

 

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

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

 回到顶部
帅哥,在线噢!
狐狸爸爸
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47497 积分:251397 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By: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
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1528 积分:10618 威望:0 精华:0 注册:2008/9/24 11:16:00
  发帖心情 Post By:2011/7/16 12:56:00 [只看该作者]

 

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

 

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


 回到顶部