aperto VB e creare un nuovo progetto in cui programmare l'applicazione di ricerca con il tasto " Control- N . " Fare clic sul collegamento che dice " applicazione Windows Form " per creare un'applicazione che si personalizza il codice del programma per eseguire una ricerca di Windows .
2
Apri finestra di progettazione form , cliccando la voce " Design" sotto il menu "Finestra " voce .
3
Trascinare un controllo Label dalla casella di strumento di controllo nella parte inferiore dello schermo nel form. Pulsante destro del mouse sull'etichetta e selezionare "Proprietà ", " Nome della cartella ", quindi digitare la voce "Testo" della finestra "Proprietà" .
4
Creare un'altra etichetta come avete fatto il primo. Trascinarlo in una posizione direttamente sotto la prima etichetta , e utilizzare le istruzioni passo di 3 a dare l'etichetta di testo "Nome file ". Queste due etichette spingono utente del programma per immettere i nomi di cartelle e file che il programma utilizzerà per fare la ricerca .
5
di Windows Trascinare un controllo casella di testo a destra della seconda etichetta , e trascinare un altro casella di testo a destra del primo. L'utente dovrà inserire i parametri di ricerca (cioè cartelle e nomi di file ) in queste caselle .
6
Trascinare un controllo Button dalla casella degli strumenti nel form , al di sotto dei controlli esistenti . Fare doppio clic sul pulsante per visualizzare la finestra per l'immissione del codice di programma per eseguire la ricerca .
7
digitare la seguente istruzione sopra il testo " Public Class " . La dichiarazione " Imports " rende il codice . Biblioteca NET disponibile per il vostro programma .
Imports System.IO
8
incollare la seguente dichiarazione di cui sopra l'istruzione " End Sub " nel " " subroutine Button1_Click . Questa dichiarazione invita routine principale del programma, che si scrive accanto .
WinSearch ( ) economici 9
Incollare il seguente codice sotto la "End Sub " linea del " Button1_Click " subroutine . Questa subroutine funziona chiamando GetFiles . NET della libreria di funzioni per la ricerca di Windows per il file inserito dall'utente .
Sub WinSearch ( ) per
Dim d As String
Dim f As String
Prova
d = TextBox2.Text
For Each f In Directory.GetFiles ( d , TextBox1.Text ) per
MsgBox ( " Il file è qui . " ) per
Successivo
Cattura e As System.Exception
Debug.WriteLine ( e.Message ) per
End Try
End Sub
10
Avviare il programma premendo il tasto " F5 ". Digitare un nome per la cartella nella casella di testo in alto del modulo. Digitare un nome di file nella casella di testo inferiore.
11
Premere il tasto del modulo per eseguire il codice del programma , che eseguirà la ricerca del file specificato . Il programma visualizza alcun messaggio se non ha trovato il file. Si visualizza " Il file è qui. " se lo fa a trovare il file .
Programmazione © www.354353.com