Frågan#1
Imports System.IO
Module Module1
Sub Main()
Dim di As DirectoryInfo = New DirectoryInfo("c:\")
Dim fsi As FileSystemInfo
For Each fsi In di.GetFileSystemInfos() ' or search pattern ("\*.\*")
If TypeOf fsi Is FileInfo Then
Console.WriteLine("it's a file: {0}", fsi.FullName)
Else
Console.WriteLine("it's a sub-dir: {0}", fsi.FullName)
End If
Next
End Sub
End Module
Hur ska jag använda den här koden? Har testat lite, men det blir inte rätt :)
(Jo, jag vet, postade helt fel, men jag kan inte ta bort :( )