机房收费系统中。在将用户输入的信息封装到实体中作为參数传到B层之前,总要对用户输入的信息进行检查。我将这种检查分为两类:
- 合法性检查
- 完整性检查
所谓合法性检查,就是用户输入的信息是否格式正确,或者是否为规定的数字或字符。而完整性检查,则是用户输入的信息是否完整,是否有漏填的。
这里我仅仅介绍一下自己是怎样实现用户输入信息的完整性检查的。
思路:
由于凡是须要用户输入信息的窗口,都须要进行完整性检查。
而这个功能的实现仅仅须要写一个函数就可以。这个函数能够为多个窗口调用。所以将它写到模块中。
最開始的时候。并没有直接写代码,而是写凝视。凝视内容为:
这个函数的參数为一个实例化的窗口,返回值为Boolean值
- 先推断窗口中的控件是否为TextBox或ComboBox
- 假设是这两类控件,就推断它们的Text属性是否为空
- 假设为空,弹出消息框提示,返回False
- 假设不为空,返回True
实现:
Imports System.Windows.Forms
''' <summary>
''' 检查用户输入是否完整,是否有漏填的
''' </summary>
''' <returns></returns>Boolean值
''' <remarks></remarks>
Function CheckIntegrity(ByVal myfrm As Windows.Forms.Form) As Boolean
Dim i As Integer
For i = 0 To myfrm.Controls.Count - 1
If TypeOf myfrm.Controls.Item(i) Is ComboBox Or TypeOf myfrm.Controls.Item(i) Is TextBox Then
If Trim(myfrm.Controls.Item(i).Text) = "" Then
MsgBox("请检查您的输入是否完整!", MsgBoxStyle.Information, "温馨提示")
myfrm.Controls.Item(i).Focus()
Return False
Exit Function
End If
End If
Next
Return True
End Function
感想:
最開始的时候想用myfrm.Container.Components.Item(i).GetType.ToString()="System.Windows.Forms.TextBox",可是Components.Item(i)没有Text属性,所以后来用到了Controls,用myfrm.Controls.Item(i).GetType.ToString()="System.Windows.Forms.TextBox"不知道为什么总是不相等(用Trim也不能够),尽管和上述代码比起来,这个显得有些繁琐,可是因为開始没有引用命名空间System.Windows.Forms,所以TypeOf,ComboBox,TextBox这些都不能直接使用,还是费了一些周折。
不知道上述的函数算不算一个好的函数。可是在重构过程中,应该要尽量想着优化,要添加自己写的代码的可复用性。降低代码的反复。