Come filtrare i record Utilizzando intervallo date in Visual Basic 6

February 25

Come filtrare i record Utilizzando intervallo date in Visual Basic 6


Ricerca record utilizzando intervalli di date sono spesso utilizzati in programmazione di computer per filtrare i record specifici che rientrano nelle date specificate. Queste registrazioni devono avere almeno un campo con il tipo di dati aggiornati. Per esempio, in un modulo di reporting in un programma Visual Basic, gli utenti possono specificare l'inizio e la fine date facendo clic su un calendario a discesa, quindi facendo clic su un pulsante di comando per filtrare i rapporti all'interno di quel particolare periodo. È possibile filtrare i record utilizzando intervallo di date in Visual Basic 6 seguendo questi passaggi.

istruzione

1 Avviare Visual Basic dal computer facendo clic su "Start> Programmi> Microsoft Visual Studio 6.0> Microsoft Visual Basic 6.0."

2 Avviare un nuovo progetto di Visual Basic selezionando "EXE standard" dalla finestra di dialogo "Nuovo progetto" che si apre. Fai clic su "Apri" per caricare l'ambiente programma.

3 Aggiungere i controlli da loro cliccando da quello "Toolbox" in un momento e rilasciandoli sul modulo. Ad esempio, se si desidera creare un programma che filtra i dipendenti che si sono assunti entro 1 Gen 2000 e 31 dicembre 2009, potrebbe essere necessario aggiungere due controlli "DTPicker", "ADO" di controllo per impostare la connessione a un database, un pulsante di comando e un controllo griglia per visualizzare i record. Poiché il controllo "DTPicker" non fa parte dei controlli di default presenti nel "Toolbox", è necessario aggiungerlo. Per fare questo, fare clic con il "Toolbox" e fare clic su "Componenti". Nella scheda "Controls", scorrere verso il basso e controllare "controlli-2 di Microsoft Windows Common 6.0". Fai clic su "Chiudi" quando fatto.

4 Continuare a progettare l'interfaccia del programma. Disporre i controlli all'interno del modulo e impostare le proprietà individuali per ogni controllo.

5 Fare clic sul pulsante "Visualizza codice" sulla parte superiore della finestra "progetti" per iniziare a scrivere i codici. All'evento "Form_Load", aprire la connessione al database.

6 Fare clic sul pulsante di comando VB che esegue il comando per filtrare i record utilizzando l'intervallo di date. All'evento "Click", scrivere un codice simile al seguente:

rs fioco come nuovo ADODB.Recordset
Dim dtFrom, dtTo come Data

Se rs.State = adStateOpen Poi rs.Close
rs.CursorLocation = adUseClient
rs.Open "select * from [nome_tabella] dove [Beginning_Date_field]> = '" & dtFrom & "' e End_Date_field <= '" & dtTo & "'", conn, adOpenDynamic, adLockOptimistic, adCmdText
Se rs.RecordCount> 0 Then
'Visualizzare i risultati filtrati nella griglia
...
Finisci se

7 Eseguire il programma premendo F5 sulla tastiera. Fare clic sui calendari a discesa e impostare le date di inizio e fine. Fare clic sul pulsante di comando per eseguire.

8 Correggere qualsiasi sintassi o errori logici, se presente.

9 Salvare il lavoro premendo il tasto "Ctrl" + "S" sulla tastiera.