掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
配列変数の値を順にLabelに表示していくには? (ID:145412)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
いつもお世話になります。 マイドキュメント以下のファイルをすべて取得して、順にLabel2に表示していくプログラムを作っているのですが どうもうまくLabel2に表示できませんでした。 構文に誤りがありましたらご指導願います。 Public Sub GetAllFiles(ByVal folder As String, _ ByVal searchPattern As String, ByRef files As ArrayList) Dim myName As String myName = SystemInformation.UserName folder = "C:\Documents and Settings\" + myName + "\My Documents" 'folderにあるファイルを取得する Dim fs As String() = _ System.IO.Directory.GetFiles(folder, searchPattern) 'ArrayListに追加する files.AddRange(fs) 'folderのサブフォルダを取得する Dim ds As String() = System.IO.Directory.GetDirectories(folder) 'サブフォルダにあるファイルも調べる Dim d As String For Each d In ds GetAllFiles(d, searchPattern, files) Label2.Text = d.ToString '5秒(5000ミリ秒)待機する System.Threading.Thread.Sleep(1000 * 5) Next d End Sub
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.