vb 跳出循环 break

vb中没有break语句，而是使用Eixt跳出循环。

for……next循环用exit for 跳出。
do……loop循环用exit do跳出。

循环的退出

Visual Basic以出口语句(Exit)的形式提供了更进一步的中止机理，与循环结构配合使用，可以根据需要退出循环。
出口语句可以在For循环和Do循环中使用，也可以在过程中使用。

Exit For
Exit Do
Exit Sub
Exit Function

出口语句具有两方面的意义。首先，给编程人员以更大的方便，可以在循环体的任何地方设置一个或多个中止循环的条件。其次，出口语句显式地标明了循环的出口点，提高了程序的可读性。

前面加个标签，用GOTO来处理。

Do Until IsNumeric(txtCard_id.Text)
MsgBox "卡号输入错误", vbInformation, "系统提示"
txtCard_id.Text = ""
txtCard_id.SetFocus
Loop

在If…的上一行输入RESET:把Exit Sub改成GoTo RESET