投稿日 | : 2007/06/22(Fri) 12:19 |
投稿者 | : ダンボ |
Eメール | : |
URL | : |
タイトル | : Re^3: メッセージ等の定数定義について |
> 思ったのは、一箇所しか使っていないメッセージをモジュールにすることによってコードを見直す場合に
> 見づらいのではないかなと思いまして^^;
それはね。
システムの規模(会社の納品物)やチョンプロ(社内使用・個人使用)とかにも依りますが。
> 'エラー処理
> sErrMsg = "ログイン画面でエラーが発生しました。" & vbCrLf & _
> Err.Number & " " & Err.Description
> MsgBox sErrMsg, vbCritical, "ログイン"
> 'エラー処理
> sErrMsg = log_Message & vbCrLf & _
> Err.Number & " " & Err.Description
> MsgBox sErrMsg, vbCritical, log_Title
こういう書き方では返って見づらくなっても当然ですわね。MsgBoxをチョコチョコ使うようでは
メッセージ定数定義の心が分かっていません。標準関数MsgOutを定義して、メッセージは必ず
この関数を経由して表示するようにしておけば、あとでどういう拡張要求が来たときでも
対処しやすくなりますよね。
例)表示した内容をログにも吐きたい。
例)あるエラーが起きたらメールを送りたい。
'エラー処理
Call MsgOut(log_Message001, Err.Number, Err.Description )