La maggior parte dei programmi per computer collegati ad un file di database consentono agli utenti finali di visualizzare e manipolare i dati, senza dover interagire direttamente con il database. In un'applicazione di inserimento dati, un modulo di ricerca permette all'utente di cercare record specifici in una tabella che corrisponde ai criteri previsti. Ciò limita la quantità di dati scaricati dal database e visualizzati sul modulo. Le informazioni recuperate possono poi essere analizzati, modificati, cancellati o inviati alla stampante per produrre una copia cartacea. Per creare un modulo di ricerca per un progetto di Visual Basic, il programmatore deve avere conoscenze di base in Visual progettazione di moduli di base e codifica, così come query di database.

istruzione

1 Caricare l'ambiente di Visual Basic dal computer facendo clic su "Start> Programmi> Microsoft Visual Studio 6.0> Microsoft Visual Basic 6.0".

2 Selezionare "EXE standard" dalla finestra di dialogo "Nuovo progetto" che si apre. Fare clic sul pulsante "Open" per procedere.

3 Trascinare e controlli goccia dal "Toolbox" nella forma di progettare l'interfaccia e impostare le singole proprietà in seguito sotto la finestra "Proprietà". Un modulo di ricerca di solito ha le caselle di testo in cui gli utenti digitano le parole da ricercare nel database, le etichette, alcuni pulsanti di comando, griglia per visualizzare il risultato, e il controllo del database che collega il modulo nella tabella all'interno del database. Continuare con la progettazione del modulo come preferita.

4 Fai clic su "Visualizza> Codice" dal menu per accedere alla sezione di codice. Questo è dove si scrivere i codici sorgente per il vostro progetto.

5 Vai a evento "Form_Load" cliccando il nome dell'evento appropriata dalle caselle a discesa nella sezione codici. Immettere un codice simile a quello qui sotto. Questo codice impostare le proprietà di collegamento del controllo dei dati e si collega alla rete per il file di database.

con Adodc1

.ConnectionString = "[Type your connection string here]"

.CursorType = AdOpenKeyset

.CursorLocation = AdUseClient

.LockType = AdLockOptimistic

.CommandType = AdCmdTable

.RecordSource = & Quot; [Digitare il nome di una tabella o una query qui] & quot;

.Ricaricare

End With

con Grid1

Set .DataSource = Adodc1

EVIDENZA = flexHighlightWithFocus

.ColWidth (0) = .ColWidth (0) + 1000 & # 039; questa è la dimensione di colonna di esempio; modificare a piacere

.ColWidth (1) = .ColWidth (1) + 1800

.ColWidth (2) = .ColWidth (2) + 1800

.ColWidth (3) = .ColWidth (3) + 2300

.Ricaricare

.TabIndex = 0

End With

6 Fare doppio clic sulla casella di testo in cui l'utente deve inserire il criterio di ricerca. Ad esempio, l'utente vuole cercare alcuni cognomi dal database ed egli digitare le lettere nella casella di ricerca. Quando viene trovata una corrispondenza, i record vengono visualizzati sulla griglia di partenza. Nella sezione di codice, andare a "Text1_Change ()" evento e inserire un codice simile al seguente:

Dim t as String

Se Text1.Text <> "" Allora

If Adodc1.Recordset.RecordCount <> 0 Then

t = & quot; * & quot; + Text1.Text + & quot; * & quot;

Adodc1.Recordset.Filter = & quot; cognome come & # 039; & quot; + T + & quot; & # 039; & quot;

Finisci se

Altro

Adodc1.Recordset.Filter = adFilterNone

Finisci se

7 Premere il tasto "F5" per eseguire il progetto. Testare il programma e verificare se è in esecuzione come dovrebbe.

8 Salvare il progetto facendo clic su "File> Salva progetto con nome" dal menu e fornendo un nome di file descrittivo.