Dim yonghuming As WinForm.TextBox = e.Form.Controls("用户名")
Dim mima As WinForm.TextBox = e.Form.Controls("密码")
If yonghuming.Text="" Then
MessageBox.Show("请输入用户名!")
Return
End If
If mima.Text="" Then
MessageBox.Show("请输入密码!")
Return
End If
以上是我想试实现的内容，因为程序中有大量需要检查是否为空的判断，我想通过函数来解决。
Dim kongjianmingcheng As WinForm.TextBox = args(0)
Dim checkmessage As String =args(1)
If kongjianmingcheng.Text = "" Then
MessageBox.show(checkmessage)
kongjianmingcheng.Select()
End If
基本功能已经实现。但是如何在调用这个自定义函数时候，即使检查是空了，主程序还是会往下执行
我想能否实现，自定函数执行完了，如果正确，就往下执行，如果不正确，就停止执行？
加好友 
发短信
Post By：2017/10/27 16:54:00 [只看该作者]
