在FUNCTION中如何返回EXIT SUB？？
在模块中编写一个FUNCTION函数abc（），该函数有判断功能：正确则返回参数值，错误则使调用该函数的sub结束，即exit sub，那么要如何实现EXIT SUB的返回呢？我试过return exit sub，abc=exit sub，abc="exit sub"，exit function等，都不能达到目的，要不就是abc（）单方面的结束，要不就是sub继续执行，有人能指教一下吗？ 问题点数：10、回复次数：6Top
1 楼microtry（米醋）回复于 2005-08-04 19:32:12 得分 0
1。首先声明模块级或全局变量String类型：strErr用来描述错误
并给初始值“”，
然后在函数的错误处理中这样写：
strErr="函数名-" & str(err.num) & "-" & err.description
2. 每次调用函数前
strErr=""
调用函数后：
if strErr<>"" then
msgbox strErr
exit sub
endif
Top
2 楼smallfire（）回复于 2005-08-04 23:07:25 得分 0
晕，看不懂Top
3 楼pheonixdie（凤凰涅磐）回复于 2005-08-04 23:13:19 得分 0
晕了!!!!Top
4 楼lsftest（）回复于 2005-08-05 09:27:07 得分 0
1.设置全局变量作为错误标志，在执行abc时按情况修改这个变量，返回sub时判断变量决定是否继续。
2.在abc的返回结果中包含错误标志。Top
5 楼fj182（阿花）回复于 2005-08-05 09:32:51 得分 0
Public Function MyFunc()
On Error Goto MyFunc_Err:
'code...
MyFunc_Exit:
Exit Function
MyFunc_Err:
'code...
Goto MyFunc_Exit
End FunctionTop
6 楼sdrcxzy（大向）回复于 2005-08-05 09:38:28 得分 0
用个变量记录出错信息就是了Top
