| ■17529 / ) |
Re[9]: フォルダ内のファイル名を取得する方法 |
□投稿者/ もんきっき (27回)-(2008/04/26(Sat) 20:12:12)
|
2008/04/26(Sat) 20:15:29 編集(投稿者)
遅いかもしれませんがいつも使ってる方法です
Dim 拡張子 As String = ".txt"
DIM dir as string = "C:\Test\"
Dim files As List(Of String) = New List(Of String)
For Each Filepath As String In IO.Directory.GetFiles(dir)
If StrComp(IO.Path.GetExtension(Filepath), 拡張子, CompareMethod.Text) = 0 Then
files.Add( Filepath)
End If
next
拡張子の識別なら半角全角の比較はいらないような気がします。
生半可な知識で言ってみますが”.TXT”が取得できないのは
プロジェクトのプロパティでテキストの比較方法の設定が
CompareMethod.binalyになってるからではないでしょうか。
ちなみにパスの連結は
System.IO.Path.Combine ("A", "B")
でやってますが、これって遅いのかな？
|
|
