Søgning poster ved hjælp datoområder er oftentimes bruges i computer programmering for at filtrere bestemte poster, der ligger inden for de angivne datoer. Disse optegnelser skal i det mindste have et felt med dato datatype. For eksempel, i en rapportering modul i et Visual Basic-program kan brugerne angive start-og slutdatoer ved at klikke på en drop- down kalender , og derefter klikke på en kommandoknap til at filtrere rapporterne inden for denne bestemte periode. Du kan foretage poster ved hjælp af datointerval i Visual Basic 6 ved at følge disse trin. Hvad du har brug
Computer
Visual Basic 6 software
Databasefil
Vis Flere Instruktioner
1
Start Visual Basic fra din computer ved at klikke på " Start > programmer > Microsoft Visual Studio 6.0 > Microsoft Visual Basic 6.0 . "
2
starte et nyt Visual Basic-projekt ved at vælge" Standard EXE "fra " nyt projekt "dialog boks, der popper op . Klik på "Åbn " for at indlæse programmet miljøet.
3
Tilføj kontrolelementer ved at klikke på dem fra " Toolbox" en ad gangen og slippe dem på formularen. For eksempel, hvis du ønsker at skabe et program , der filtrerer medarbejdere, der blev ansat inden 1 januar 2000 og 31. december 2009, kan du nødt til at tilføje to " DTPicker " styrer " ADO " kontrol for at indstille forbindelsen til en database , en kommandoknap , og et gitter kontrol for at vise posterne. Da " DTPicker " kontrol ikke er en del af standard styrer fundet i " Toolbox" , skal du tilføje det. For at gøre dette , skal du højreklikke på "Toolbox " og klik " Components" . Under " Controls " fanen, skal du rulle ned og tjek " Microsoft Windows Common Controls - 2 6,0 " . Klik på "Luk" når du er færdig .
4
Fortsæt designe dit program interface . Arranger kontrolelementer i formularen og indstille individuelle egenskaber til hver kontrol .
5.
Klik på " View Code "-knappen på toppen af " Project Explorer " vinduet for at begynde at skrive koder. På " Form_Load " begivenhed , skal du åbne din database forbindelse.
6
Klik VB kommandoknap, der udfører kommandoen til at filtrere poster ved hjælp af datointerval. På " Click " begivenhed , skrive en kode der ligner følgende : Hej
Dim rs som New ADODB.RecordsetDim dtFrom , dtTo som Dato
p Hvis rs.State = adStateOpen Derefter rs.Closers . CursorLocation = adUseClientrs.Open "Vælg * fra [ table_name ], hvor [ Beginning_Date_field ] > = ' " & dtFrom & " ' og End_Date_field < = ' " & dtTo & " '" conn , adOpenDynamic , adLockOptimistic , adCmdTextIf rs.RecordCount > 0 Then'display de filtrerede resultater i nettet ... End If
7
Kør programmet ved at trykke F5 på dit tastatur. Klik på drop- down kalendere og indstille begyndelsen og slutningen datoer. Klik på kommandoen for at udføre .
8
rette eventuelle syntaks eller logiske fejl , hvis nogen.
9
Gem dit arbejde ved at trykke på " Ctrl" + "S" på tastaturet .