過去ログ

                                Page     427
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
   通常モードに戻る  ┃  INDEX  ┃  ≪前へ  │  次へ≫   
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
 ▼プロシージャ名を返す  ほびっと 03/11/8(土) 16:35
   ┗Re:プロシージャ名を返す  よろずや 03/11/8(土) 20:30
      ┗Re:プロシージャ名を返す  ほびっと 03/11/8(土) 20:38

 ───────────────────────────────────────
 ■題名 : プロシージャ名を返す
 ■名前 : ほびっと
 ■日付 : 03/11/8(土) 16:35
 -------------------------------------------------------------------------
   Access2002です。
現在実行中のプロシージャ名を返す(取得)したいのですが、良い方法はありませんか?
処理をいくつかのサブルーチンに分けているのですが、現在実行中のプロシージャ名をフォームに表示しようと思っています。

 ───────────────────────────────────────  ■題名 : Re:プロシージャ名を返す  ■名前 : よろずや  ■日付 : 03/11/8(土) 20:30  -------------------------------------------------------------------------
   >現在実行中のプロシージャ名を返す(取得)したいのですが、良い方法はありませんか?
ありません。
次善の策として、プロシージャ名の次の行に定数を書いたりしてます。
すぐ近くに記述しますので、間違いにくいと思います。
例:
Private Sub MyProc1(arg1 As String)
Const PROCNAME = "MyProc1"
 :
(略)
 :
ErrProc:
  MsgBox Err.Number & ":" & Err.Description, , PROCNAME
End Sub

 ───────────────────────────────────────  ■題名 : Re:プロシージャ名を返す  ■名前 : ほびっと  ■日付 : 03/11/8(土) 20:38  -------------------------------------------------------------------------
   よろずやさん、ありがとうございます。

>次善の策として、プロシージャ名の次の行に定数を書いたりしてます。
>すぐ近くに記述しますので、間違いにくいと思います。

教えていただいた↑の方法を採りたいと思います。
「プロシージャ名の次の行に定数を書」く工夫に感心しました。
ありがとうございました。

━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━    通常モードに戻る  ┃  INDEX  ┃  ≪前へ  │  次へ≫    ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━                                 Page 427