人気ブログランキング | 話題のタグを見る
Visual Basic 6.0 を使わなければいけない幸運にして不幸な皆様へ
 6/30付けで、Visual Basic 6.0のMSDNサブスクリプション ダウンロードサイトからの提供が終了されるそうです。

SzkTech WebLog : 【警報】MSJVMを含む製品の入手が困難に

 もう時間がないので、必要な人は早めのダウンロードを。

 で、お知らせついでに、僕が使ってるVB6用のフリーツールを紹介しようと思います。

 「MZ-Tools 3.0」という、VB6のエディタ機能拡張ツール。本当は「Joel on Software」で紹介されていたツールを探してたんですが、そのサイトがどっかに行ってしまって、代替品を探してさまよっていたら、このツールに当たりました。


 インストールは簡単です。公式サイトの「Download(Freeware)」ボタンをクリックして、落ちてくるファイルを実行すると、インストーラーが起動します。インストールする場所とスタートメニューへの登録名を指定すると、インストールが始まります。
 インストール終了後、Visual Studio を立ち上げると、「MZ-Tools 3.0」の機能が使えるようになっています。

 お気に入りの機能が、エラーハンドラ入力機能。いちいち入力するのが面倒なエラーハンドラを、ワンクリックで入力してくれます。(「Joel on Software」で、あると便利だと紹介されていた機能)
 ちなみに、デフォルトでは


On Error GoTo {PROCEDURE_NAME}_Error

{PROCEDURE_BODY}

On Error GoTo 0
Exit {PROCEDURE_TYPE}
{PROCEDURE_NAME}_Error:

MsgBox "Error " & Err.Number & " (" & Err.Description & ") in
procedure {PROCEDURE_NAME} of {MODULE_TYPE} {MODULE_NAME}"


という設定になっていますが、
僕は、これに"Resume"と"Debug.Assert False"を加えて、以下のようにしています。
(情報ソース失念。僕のオリジナルアイディアではないです。)



On Error GoTo {PROCEDURE_NAME}_Error

{PROCEDURE_BODY}

On Error GoTo 0
Exit {PROCEDURE_TYPE}
Resume' ← ココと
{PROCEDURE_NAME}_Error:

MsgBox "Error " & Err.Number & " (" & Err.Description & ") in
procedure {PROCEDURE_NAME} of {MODULE_TYPE} {MODULE_NAME}"
Debug.Assert False' ← ココに追加


実際のコード例は、以下のようになります。



Private Sub sampleCode()

On Error GoTo sampleCode_Error

' 処理をここに書く

On Error GoTo 0
Exit Sub
Resume
sampleCode_Error:

MsgBox "Error " & Err.Number & " (" & Err.Description & ") in procedure
sampleCode of Form frmEditWellMap"
Debug.Assert False' ← エラーが発生するとココで止まる
End Sub


こうしとくと、デバッグ中にエラーが発生した場合には、Assert文のところで処理が止まります。そしたら、おもむろにIDE上で処理中のステップを示す黄色の矢印をグググッとResume文のところまで動かします。それから、F8を押して、処理を1ステップ進めると、エラーが発生した行に処理が移動して、どこでエラーが発生しているか分かるわけです。(というか、ここまでしないと、どこでエラーが起きてるのかVB6では分からないんだなぁ・・・)


 ちなみに、.NET対応の「MZ-Tools」もあるんですが、有償のようです。VB6用だけフリーっていうのは、やっぱり、"VB6はもういいや"って姿勢の表れなんですかね・・・
by fkmn | 2006-06-29 23:39 | IT
<< 【感想】MOTHER3 「外人」という言葉が気になる >>


とあるWebアプリケーションエンジニアの日記

by fkmn
S M T W T F S
1 2
3 4 5 6 7 8 9
10 11 12 13 14 15 16
17 18 19 20 21 22 23
24 25 26 27 28 29 30
31
カテゴリ
以前の記事
ブログパーツ
リンク
検索
タグ
最新のトラックバック
その他のジャンル
ファン
記事ランキング
ブログジャンル
画像一覧

fkmnの最近読んだ本 フィードメーター - フッ君の日常 あわせて読みたい AX