在你要goto 的地方加标号,可以是数字或者字母,以冒号结尾做区别如Recycle:a=b+c……goto Recycle当运行到goto即会跳转到对应地方
比如:1)
private sub Command1_click()
on error goto ErrHandle '遇到错误转移
...
exit sub
ErrHandle:
'错误处理语句.
end sub
2)
if n>5 then
goto aa: '转到标号aa 处 无条件跳转
else
endif
aa:
……