简单的流程问题 和 resume 问题

[happymingnan]

On Error GoTo getRS_Error
strConnection = "Provider=Microsoft.jet.oledb.4.0;Data Source=" & App.Path & "\"
strConnection = strConnection & "Client.mdb"
strArray = Split(sql) '这是什么意思?
con.Open strConnection '打开连接
rs.Open Trim$(sql), con, adOpenKeyset, adLockOptimistic
Set getRS = rs '返回记录集
iflag = 1
getRS_Exit:
Set rs = Nothing
Set con = Nothing
Exit Function
getRS_Error:
MsgBox "查询错误：" & Err.Description
iflag = 2
Resume getRS_Exit

最后一句resume getrs_exit 是什么意思啊? 如果发生错误跳到getrs_exit, 关闭
rs,con. 那么如果没发生错误的话, rs是不是就没有被清空,con连接是不是就没有关闭. 那样合理吗?

[射天狼]

resume getrs_exit 从getrs_exit处继续执行!!