Hoe maak je een Search Formulier voor een Visual Basic -project Make

Zoek records op basis van door de gebruiker opgegeven criteria. image search icoon door rgbspace van & lt; a href = 'http: //www.fotolia.com'> Fotolia.com & lt; / a & gt;

meeste computerprogramma's verbonden met een databasebestand kunnen eindgebruikers gegevens bekijken en bewerken zonder dat u direct communiceren met de database.In een data entry applicatie, een zoekformulier kan de gebruiker om te zoeken naar specifieke records in een tabel die overeenkomt met de criteria.Dit beperkt de hoeveelheid gedownloade uit de database en weergegeven op de formuliergegevens.De opgehaalde informatie kan vervolgens worden geanalyseerd, bewerkt, verwijderd of naar de printer op een hard copy te produceren.Om een ​​zoekformulier voor een Visual Basic-project te maken, moet de programmeur basiskennis in Visual Basic vorm ontwerp en codering, evenals database query hebben.

wat je nodig hebt

  • Visual Basic 6 software
  • Databasebestand

instructies

  1. Laad de Visual Basic-omgeving van uw computer door te klikken op "Start & gt

    ; Programma's & gt; Microsoft Visual Studio 6.0 & gt; Microsoft Visual Basic 6.0".

  2. Selecteer "Standard EXE" van de "New Project" dialoogvenster dat verschijnt.Klik op "Open" knop om verder te gaan.

  3. Sleep controles van de "Toolbox" in de vorm van de interface design en stel de individuele eigenschappen daarna onder het venster "Eigenschappen".Een zoekformulier heeft meestal tekstvakken waar gebruikers typen woorden te zoeken in de database, labels, een aantal commando knoppen, net om het resultaat weer te geven, en database controle die de vorm verbindt in de tabel in de database.Ga door met het ontwerpen van de vorm de voorkeur.

  4. Klik op 'Bekijk & gt; Code "in het menu te gaan naar de sectie code.Dit is waar je zal schrijven de broncodes voor uw project.

  5. Ga naar "Form_Load" evenement door te klikken op de juiste event naam van de drop-down menu in de sectie codes.Voer een code vergelijkbaar met het hieronder.Deze code zal de verbinding eigenschappen van uw gegevens controle te stellen en verbindt het raster om het databasebestand.

    Met Adodc1

    .ConnectionString = & amp; quot; [Typ uw verbinding string hier] & amp; quot;

    .CursorType = adOpenKeyset

    .CursorLocation = adUseClient

    .LockType = adLockOptimistic

    .CommandType = adCmdTable

    .RecordSource = & amp; quot; [Typ de naam van een tabel of query hier] & amp; quot;

    .Refresh

    End With

    Met Grid1

    Set .DataSource = Adodc1

    .HighLight = flexHighlightWithFocus

    .ColWidth (0) = .ColWidth (0) + 1000 & amp; # 039; dit is een voorbeeld kolomdimensie;verandering als preferred

    .ColWidth (1) = .ColWidth (1) + 1.800

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

    .ColWidth (3) = .ColWidth (3) + 2.300

    .Refresh

    .TabIndex = 0

    End Met

  6. Dubbelklik op het tekstvak waarin de gebruiker de zoekcriteria zullen betreden.Bijvoorbeeld, de gebruiker wil bepaalde achternaam te zoeken van de database en zal hij de letters in het zoekvak te typen.Wanneer wedstrijden worden gevonden, zal de records op de rooster worden weergegeven.In de sectie code, ga naar "Text1_Change ()" gebeurtenis en het invoeren van een code zoals de volgende:

    Dim t als Koord

    Als Text1.Text & lt; & gt;"" Dan

    Als Adodc1.Recordset.RecordCount & amp; lt; & gt;0 Dan

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

    Adodc1.Recordset.Filter = & amp; quot; achternaam graag & amp; # 039; & amp; quot;+ T + & amp; quot; & amp; # 039; & amp; quot;

    Eind als

    Else

    Adodc1.Recordset.Filter = adFilterNone

    Eind als

  7. Druk op de toets "F5" om het project uit te voeren.Test het programma en controleer of het loopt zoals het hoort.

  8. Sla het project door te klikken op "File & gt; Project opslaan als" in het menu en het verstrekken van een beschrijvende bestandsnaam.

497
0
3
Visual Basics Programming