VBばかリやってると馬鹿になる
■ このスレッドは過去ログ倉庫に格納されています
try、throws、catch みたいにして使ってみたけど駄目?
美しくないのはたしかなのだが、仕方ない・・・
Public Function HegHge() As Long
On Error GoTo catch
If ( bRet = False ) Then Err.Raise 65535
finally:
On Error Resume Next
Exit Function
catch:
'〜エラー処理〜
Resume finally
End Function
■ このスレッドは過去ログ倉庫に格納されています