VB中学、入門講座の第5回分について

タグの編集
投稿者 dai  (社会人) 投稿日時 2009/8/29 23:00:18
お世話になります。
このVisial Basic中学校の入門講座の第5回分の

5.応用

の手順4.についての質問なのですが、
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        Dim FolderName As String
        FolderName = Environment.GetEnvironmentVariable("WINDER")

        txtOpenFileName.Text = FolderName & "¥" & Dir(FolderName & "¥*.bmp")

    End Sub
(¥が全角なのは打つと\と表示された為です。)
とプログラムをするとWindowsフォルダからbmpファイルを探して最初に見つかったファイルの名前を表示する。
と書かれているのですが、デバックするとtxtOpenFileNameという値にしてあるテキストボックスに¥と、txtSaveFileNameという値にしてあるテキストボックスに¥.jpgとだけ表示されて出てくるのですが、
この講座に書かれてある通りファイル名が表示されるようにするにはどうすれば良いのでしょうか?

宜しくお願いします。
投稿者 neptune  (社会人) 投稿日時 2009/8/30 02:57:36
こんにちは


誤:WINDER
正:windir
大文字小文字は関係ありません。

でやってみて下さい。

MSDNのGetEnvironmentVariable メソッド の所にサンプルコードがあります。
MSDNも見ておこう。

関係ないですが、投稿欄の上のほうに
「投稿で使用できる特殊コードの説明。」があります。コードをuPする時は、コード用の
特殊コードを使用すると見易いです。VBのアイコンも表示できます。
投稿者 dai  (社会人) 投稿日時 2009/8/30 04:02:49
ありがとうございます。
無事、正常に作動するようになりました。

MSDNのこと、特殊コードのことも教えて頂きありがとうございます。
是非、次からの参考にさせて頂きます。