已经第二次机房收费系统重构了,一遍当然得有一遍的效果,正如对于文本框为空的提示方法,回顾第一遍机房,那些傻里傻气的If语句让自己对代码的亲和度大打折扣啊!那么到底有什么办法解决那些重复性的判断呢?这时候我们就要提到所谓的Model窗体了。在Model窗体中,建立一个封装数组,当窗体中需要判断大量文本框为空的时候,只需简单的调用即可。
2、用结构体定义一个Term类型数组
新建一个Model类,来存放公共需要的部分。
1、定义一个结构体Term,且用结构体封装一个数组
- Public Structure Term '定义结构体term
- Dim controlSub As Control
- Dim strText As String
- Sub New(ByVal controlSub As Control, ByVal strText As String) '初始化对象
- With Me
- .controlSub = controlSub
- .strText = strText
- End With
- End Sub
Public Structure Term '定义结构体term
Dim controlSub As Control
Dim strText As String
Sub New(ByVal controlSub As Control, ByVal strText As String) '初始化对象
With Me
.controlSub = controlSub
.strText = strText
End With
End Sub
2、用结构体定义一个Term类型数组