Reading Files

Dim d() As String
Dim myDir As String

myDir = "c:\windows"
d = System.IO.Directory.GetFiles(myDir)

Dim en As System.Collections.IEnumerator

en = d.GetEnumerator

While en.MoveNext
ListBox1.Items.Add(CStr(en.Current))
End While
 

Similar threads

Back
Top