ハードドライブ内のフォルダの下にあるすべてのファイル名をリストする方法は？

Question

私はすべてのファイル名をvb.netでハードディスクに保存したいのですが、わかりません。まず、folderbrowserコンポーネントのあるフォルダを選択し、次にすべてのファイルをリストします。

ここにあります私は、ファイル

 Dim files() As String = Directory.GetFiles(txt_folder.Text) 
    For Each a In CStr(files.Count) 
     folder_hard.Rows.Add(Directory.GetFiles(txt_folder.Text)) 
    Next 

0123の一覧を表示しようとしたとき、私のコード（フォルダのみを選択するための）リストのための

dossier_disque.ShowDialog() 
    txt_folder.Text = dossier_disque.SelectedPath 

すべてのファイルは、私はそれぞれに使用しようとしたが、それは

私のコードを修正していません

folder_hardは、 txt_folderはこのコードのフォルダパス

の名前で結果グリッド名で、私はグリッドに二回

Answer 1

を最初のファイルのみを見ることができ、あなたの各ループのために問題があります： CStr（）は値を文字列に変換します。 したがって、forループは、ファイル配列内のファイル数の文字列の各文字をループしています。そして、ファイル配列内の各ファイル名になります

For Each a In files 

： だからに変更します。あなたのグリッドにそれぞれを追加したいあなたがその行を変更する必要がある場合 は：

folder_hard.Rows.Add(a) 

だから、これは動作するはずです：[ディレクトリ内のすべてのファイルのリストを取得する

Dim files() As String = Directory.GetFiles(txt_folder.Text) 
For Each a In files 
    folder_hard.Rows.Add(a) 
Next