例外エラー時、例外発生箇所を取得するには

質問

XP、VB6.0で開発しております。
例外エラー時の処理について、教えて頂けますでしょうか。

予期せぬエラーが発生した時のため、エラーハンドルを設けて
相応の処理を実行しようと思うのですが
例外が発生したファイル名、関数名、ファイル行番号を取得するには
どうすれば宜しいのでしょうか。

Cの__FILE__、__func__、__LINE__マクロに変わるような関数
もしくは方法をご存知の方、いらっしゃいましたらご教示願います。

今は以下のような処理を施しています。
(関数毎に、エラーハンドルを設け、範囲を絞り込む)
最悪、これで進めようと思うのですが、行番号が取れないので
どこでエラーが発生したのか、正確に把握する事が出来ません。

TEST.frm
----------------------------------
Dim Const FILE_NAME As String = "TEST.frm"
Private Sub TestFunction
On Error Goto TestFunction_ErrHandle
(省略)
Exit Sub
TestFunction_ErrHandle:
ErrFunction(FILE_NAME, "TestFunction")

宜しくお願い致します。

回答No.1

noname#58274

トレース実行して、どの時点でエラーハンドリングされるか見る、というわけにはいかないでしょうか・・？

お礼

回答有難うございます。
デバックにおいて、予測できるエラーは潰しているつもりなのですが
なにぶん、完璧でない私が、完璧なシステムを作れる訳はなく（汗）

リリース版で納品後、運用中に思わぬエラーが発生した場合
エラー内容をログに出力する予定なのですが
後々調べるに当たって、エラー発生箇所が曖昧（関数単位でしか分からない）である事が不安でして。
一般的には、皆様どうされていらっしゃるのでしょうか？