Resume

Resume用于错误处理程序（由On Error调用））中的传统QB错误处理机制，以将执行返回到导致错误的行。通常这是在正确处理错误之后使用的，以便再次使用更正的数据尝试以前的错误操作。

Resume将Err的值重置为0

''用-lang fblite或qb编译

#lang "fblite"

Dim As Single i, j

On Error Goto ErrHandler

i = 0
j = 1 / i '这一行在第一次尝试时会引起零分错误;执行跳转到ErrHandler标签

Print j '在i值修正后，打印0.5

End '结束程序，以便执行不会再次通过错误处理程序

ErrHandler:

i = 2
Resume ' execution jumps back to 'j = 1 / i'行，这次不会造成错误

• -lang fb 方言不支持RESUME。语句可用于其函数形式返回错误代码
  

If Open( "文本" For Input As #1 ) <> 0 Then
  Print "无法打开文件"
End If

• 不接受行号或标签
  
• 必须使用-ex 选项进行编译
  
  

• Err
  
• Resume Next
  
• 错误处理