机房那些事儿---清空combobox
最近,在敲机房收费系统的添加用户时遇到了一丢丢问题。
本来是这样一个界面,当你运行的时候,本着为人民服务的原则,有如下三种情况需要清空框框中的内容:
(1)单击确认按钮,框框中有不符合规定的内容时;
(2)弹出对话框—-成功添加用户,单击确定按钮后;
(3)单击清空按钮时。
这些代码其实原理都是一样的
以单击清空按钮时为例
加载窗体时添加如下代码
这里由于用户级别为固定的几项,并且只允许用户选择不能输入,所以我们没添加如下代码,并设置该combobox 的style属性为2-Dropdown List
Private Sub Form_Load()
comboUserLevel.AddItem "管理员"
comboUserLevel.AddItem "操作员"
comboUserLevel.AddItem "一般用户"
End Sub
扩展:combobox style属性
0-Dropdown combo(默认值):称为下拉式组合框,包括一个下拉式列表和一个文本框,文本框接受文本输入
1-Simple combo:称为简单组合框,由一个文本框和一个标准列表框组成,列表框不是下拉式的
2-Dropdown List:称为下拉列表组合框,他在外观上和下拉式组合框一样,可以从下拉列表框选择选项,但不能接受文本输入
单击清空按钮时添加如下代码
Private Sub cmdClear_Click()
txtUserID.Text = ""
comboUserLevel.Text = ""
txtUserName.Text = ""
txtPassWord.Text = ""
txtPassWordSure.Text = ""
cmdOK.Enabled = True
End Sub
运行
出现错误的原因是我们当时设置了comboUserLevel的style属性为2,只接受选择,不能接受文本输入,但是现在我们偏要赋空值给他,所以才会出错。
那怎么办呢???
智慧如我—-其实我们不止可以在代码中给combobox赋值的,combobox还有一个List属性,我们在他的属性中添加如下内容
大家千万不要忽略最上边的那个空格的一项,因为我们一会想要清空combobox就靠它啦!
将单击清空按钮的comboUserLevel一项改为以下就好了
comboUserLevel.ListIndex = 0
完美!!!
总结:在敲机房的时候,开始害怕极了,都说这个是自己敲的代码,很难的,就把自己牵制住了,其实它并没有那么难,我们就去做就好了。在过程中我们会遇到各种各样的问题,但是我们没必要害怕,解决问题的方法总比问题多。想我这次遇到的这个问题,其实就是控件掌握的不好,不清楚控件的属性,其实多用就好了,相信自己!
还没有评论,来说两句吧...