【机房系统知识小结点系列】之遍历窗体中的控件,判断Text是否为空?
做机房系统时,几乎每个窗体中都会用到判断界面中的控件是否为空的情景。我们曾经是这样走来的:
第一版:
好处:对窗体界面中的Text等控件,逐一做判断,当用户输入某一项为空的时候,会议弹出框的形式,告诉用户,具体是哪一个控件,输入有误。
坏处:首先,界面看起来就很繁琐;其次,浪费了大量的手工工作,代码不具有可复用性;再次,编码的时候,如果控件数目比较多的话,容易忘记其中的某些控件。
Dim isResultEmpty As Boolean isResultEmpty = frmName.IsAllEmpty(Me) If isResultEmpty = True Then '判断文本信息是否为空,为空返回False,不为空返回True Else End If