Microsoftのホームページからサンプルをダウンロードして試しているのですが、
当たり前ですが英語です。フォーム上のものはシコシコ日本語にできます。が、
ソースでの例えば下記のようなMsgboxの中のErr.Descriptionが日本後になるように
する方法がわかりません。教えてください。

Err_Trap:
' Trap common errors returned from componenet...
   Select Case Err.Number
   Case &H80040203
    ' The file is open by another program

      MsgBox Err.Description & " Please choose another file."
             =====ここを日本語に==========

      Err.Clear: Resume GetFileFromUser

よろしくお願いいたします。

> ソースでの例えば下記のようなMsgboxの中のErr.Descriptionが日本後になるように
> する方法がわかりません。教えてください。

単純にソースの中のメッセージの英語を日本語に書き換えれば良いのでは？
例えば下記の様にです。

Private Sub Command1_Click()

Err.Number = &H80040203  'テストの為に代入しています

Select Case Err.Number
   Case &H80040203
    ' The file is open by another program

      'MsgBox Err.Description & " Please choose another file."
      '       =====ここを日本語に==========
      MsgBox Err.Description & " 別のファイルを選んでください。"


      'Err.Clear: Resume GetFileFromUser
End Select

End Sub

翻訳のホームページもありますので！
http://www.excite.co.jp/world/english/ '先頭の　h　は消してある

サンプルと説明が不適切、不十分でした。

ダウンロードしたサンプルをそのまま実行するとErr.Description のところが
英文になります。
これを日本語表示にするにはどうしたらよいか、という質問です。

解決方法：
新規にVBを起動し、そこへ「ソースコード」の一部をコピーペーストすると
日本語になりました。
この方法では、フォーム上に配置されているものを作り直す必要があるのか
どうか、これもコピーペーストでよいのか。まだやってはいないのですが、
少なくともErr.Descriptionは日本語になりました。

もう少し勉強してみます。ありがとうございました。

ソースファイルはテキストファイルなわけだし、
日本語環境でコンパイルしなおせばいいような気もしますが、
対象のサンプルのURLとか載ってないので試していません。

とりあえずこんなのもあるっていう情報だけ
[Microsoft Visual Basic 6.0 の国際パッケージと Deployment Kit]
http://support.microsoft.com/kb/236404/ja

色々と検索してると言語バージョンの違いによる不具合も
引っ掛かりましたし、日本語環境で開発してるならコード
レベルで参考にした方が安全かもしれませんね。

色々と調べていただいた、参考ページを読み勉強します。
ありがとうございました。