我正在尝试在“保存”按钮上提供一个验证错误,指出某个字段不能为空。
老实说,我不确定该怎么做。
If txtGEMFeeWBS.Text = "" Or lblGEMFeeWBS.Text = "" Then
MsgBox("Error Gem Fee WBS Code must be provided before you can save")
End If
Save_Validation()
If blnValidation = True Then
If Me.lblInvoiceShipmentID.Text = "" Then
Save(1)
Else
SaveAllKitUnits()
Save(2)
End If
End If
在抛出消息框后,我想关闭而不是保存数据信息
答案 0 :(得分:0)
我不确定是否已经理解了这个问题,但是...
这取决于很多事情。您要完全关闭程序吗?您在方法里面吗?等等...
如果您想关闭整个程序(我认为不是),请尝试 Application.Exit()
如果您使用的是方法,则可以使用 不返回任何内容
,在其他情况下,请使用GoTo:代码上的任意位置(几乎
您可以放置 SampleGoToLine:(不要忘记“ :”)
然后在任意位置
调用说明 GoTo SampleGoToLine
需要,或者在显示消息框后显示(视您的情况而定)。
(发明了 SampleGoToLine 这个名称,您可以放置任何非reserved VB keyword的名称)