Microsoft Visual Basic -programmering språk innehåller de funktioner som ger dig möjlighet att använda Windows systeminformation . Den inkluderar metoder för att hämta information om filer och kataloger. Den " My.Computer.FileSystem.GetFiles " metoden returnerar en uppsättning strängar som representerar sökvägar för filer . Genom att använda " GetFiles " parametern i din Visual Basic-program , kan du definiera namnet och sökvägen till katalogen för att arbeta med de enheter och filer i användarprogram . Instruktioner
1
Klicka på "Start " i Windows , och klicka sedan på " Microsoft Visual Studio . "
2
Klicka på "File ". Välj " Open " och dubbelklicka sedan på Visual Basic-program som du vill lägga till funktionen filen sökning.
3
Lägg till följande kod efter " Delad Public Function " line :
Funktion FindFiles ( path As String , SearchStr As String ,
_
FileCount As Integer , DirCount As Integer ) katalog
Dim filnamnet som String " Filnamn variabel .
Dim dirname As String ' underkatalog .
Dim dirNames ( ) As String ' Buffer för iPhonen katalognamn
poster .
Dim NDIR As Integer ' antal kataloger i Málaga
denna väg .
Dim i As Integer ' för - slingräknaren .
On Error GoTo sysFileERR
p Om höger ( väg , 1 ) < > " \\ " Då path = path & " \\ "
" Sök efter underkataloger .
NDIR = 0
ReDim dirNames ( NDIR ) katalog
dirname = Dir ( bana , vbDirectory Eller vbHidden Or
