VB.NET用Controls集合对为空的控件进行遍历
2013-05-28 20:03
302 查看
一、需求
面对比较复杂的系统,我们大多是需要对文本框、组合框进行重复判断,以保证它们不为空。二、方案
1、每一个窗体有一个Controls集合,代表窗体中出现的所有控件(如文本框、命令按钮和标签),使用该Controls集合,可以很容易地完成用户录入的有效性检测工作(VB.NET)。延伸:Forms集合包含VB.NET项目中的所有窗体。
2、实例
定义一个类,专门用来进行判断。别的窗体直接调用类中方法即可进行判断。
//进行判断的类 Public ClassVerifyUser Public Function verify(log AsWindows.Forms.Control.ControlCollection) As Boolean Dim ConObject As Control '声明一个Control类的实例 Dim flag As Boolean '声明boolean型变量,用来给调用此方法的窗体返回信息 flag = True '默认控件内都有值 '开始遍历Control类中的每一个控件 For Each ConObject In log '利用TypeOf查看控件类型 If TypeOf (ConObject) Is TextBoxThen '若文本框的Text属性为空,提示信息 If ConObject.Text ="" Then '.Tag代表当前为空的控件 MsgBox(ConObject.Tag.ToString + "不能为空,请输入完整", vbOKOnly,"提示") flag = False '此控件为空,返回信息 End If ElseIf TypeOf (ConObject) IsComboBox Then '组合框为空时,弹出信息 If ConObject.Text ="" Then MsgBox(ConObject.Tag.ToString + "不能为空,请输入完整" + vbOKOnly +"提示") flag = False End If End If Next Return flag End Function End Class
//调用此类的方法 '判断是否为空,进行提示 Dim MyObjectAs New VerifyUser IfMyObject.verify(Controls) = False Then txtUserID.Focus() txtUserID.SelectAll() Exit Sub End If
注:
(1)for each循环中,逐个处理Controls集合中的每个控件。If语句对控件类型进行检测。若控件为Text控件,则使用Text属性检测该文本框中的文本。若文本框为空,则出现提示。
(2)必须有相应的判断,调用此类时,逻辑才会清晰。
(3)Control是.NET提供的类,它是所有控件的基类,在System.Windows.Form命名空间中。
(4)Type…Is运算符检测对象类型。如果对象是指定类型或从指定类型派生而来,则返回True。
三、不足
此方法遍历时是从后向前弹出对话框。比如:用户名和密码都为空,它会先弹出密码不能为空,再弹出用户名不能为空。我们如果采用此方法,在放置控件时需注意一下顺序。四、借鉴
王海涛师哥:它这里涉及到对部分控件进行检测http://blog.csdn.net/xiaoduishenghuogo/article/details/7291167
相关文章推荐
- 控件集合VB.NET用Controls集合对为空的控件进行遍历
- Vb.net遍历一个窗口中的所有某类对象 (窗体中的控件) 的方法
- 用VS2017进行移动开发(C#、VB.NET)——Progress控件,Smobiler移动开发
- asp.net中遍历界面上所有控件进行属性设置
- vb.net中对Repeater控件进行分页显示
- [VB.NET]如何遍历web窗体中所有的控件
- 遍历控件 vb.net 2005
- 使用Ext.net时如何遍历Panel或者FormPanel中Content标签下的控件,并进行验证
- VisualStudio移动开发(C#、VB.NET)Smobiler开发平台——ImageTabBar控件的使用方式
- ASP.NET(VB.NET)学习笔记--第五章.ASP.NET的其他Web控件
- VS2017移动开发(C#、VB.NET)——Numeric控件的使用方式
- asp.net遍历TextBox控件
- DataTable绑定Table控件中的数据(vb.net之经典应用)
- vb.net中用户自定义控件中属性、方法、事件的理解
- vb.net中进行类强制转换
- Vb.net在窗体上而非textbox控件上捕捉键盘上按下的键
- 【日记】利用VB.NET实现MYSQL和MSSQL进行批量插入记录的方法及比较
- asp.net(VB)中使用正则获取图片地址并进行下载.
- 在VB.NET的表单中叠代使用控件
- [CodeProject每日一荐] PopupNotifier: 一个Office 2003风格的通知控件(VB.NET)