Ako si vyrobiť vyhľadávací formulár pre Visual Basic projektu

Väčšina počítačových programov , pripojenej k súboru databázy umožňujú koncovým používateľom zobraziť a manipulovať s dátami , bez toho aby museli komunikovať priamo s databázou . V zadávanie dát aplikácie , vyhľadávací formulár umožňuje užívateľovi hľadať konkrétne záznamy v tabuľke , ktorá zodpovedá kritériá stanovené . To obmedzuje množstvo stiahnutých dát z databázy a zobrazí na formulári . Získané informácie potom môžu byť analyzované , editovať , mazať alebo odoslať do tlačiarne na výrobu papierovej . Ak chcete vytvoriť vyhľadávací formulár pre Visual Basic projektu , programátor musí mať základné znalosti jazyka dizajnu a kódovanie formulára , rovnako ako databázový dotaz . Veci , ktoré budete potrebovať
Visual Basic 6 softvér
súbor databázy
Zobraziť ďalšie inštrukcie Cestuj 1

Vložte prostredie Visual Basic z vášho počítača kliknutím na tlačidlo " Štart > Programy > , Microsoft Visual Studio 6.0 > Microsoft Visual Basic 6.0 " .
2

zvoľte " Štandardné EXE " z " v dialógovom okne Nový projekt " , ktorý sa objaví . Kliknite na tlačidlo " Otvoriť " pre pokračovanie .
3

Presuňte ovládacie prvky z " Toolbox " do podoby navrhnúť rozhranie a nastaviť jednotlivé vlastnosti potom v okne " Vlastnosti " . Vyhľadávací formulár má zvyčajne textové polia , kde môžu používatelia zadávať slová vyhľadávať na databázy , štítky , niektoré príkazových tlačidiel , mriežky pre zobrazenie výsledku , a kontrola databázy , ktorá spája formulár do tabuľky v databáze . Pokračujte v návrhu formulára ako prednostné .
4

Kliknite na " View > Code " z menu pre prechod na časti kódu . To je miesto , kde budete písať zdrojové kódy pre váš projekt .
5

Prejsť na " Form_Load " udalosť kliknutím na príslušný názov udalosti z uvedených rozbaľovacích polí v sekcii kódy . Zadajte kód podobný ako ten dole . Tento kód nastaví vlastnosti pripojenia vášho riadenia dát a spája sieť do súboru databázy .

S Adodc1.ConnectionString = " [ zadajte pripojovací reťazec tu ] " . CursorType = adOpenKeyset.CursorLocation = adUseClient.LockType = adLockOptimistic.CommandType = adCmdTable.RecordSource = " [ Zadajte názov tabuľky alebo dotazu tu ] " . RefreshEnd S

S Grid1Set . DataSource = Adodc1.HighLight = flexHighlightWithFocus.ColWidth ( 0 ) = . colwidth ( 0 ) + 1000 " je ukážkový rozmer stĺpec , zmena ako preferred.ColWidth ( 1 ) = colwidth ( 1 ) + 1800.ColWidth ( 2 ) = colwidth ( 2 ) + 1800.ColWidth ( 3 ) = colwidth ( 3. ... ) + 2300.Refresh.TabIndex = 0End S
6

Dvakrát kliknite na textové pole , kde užívateľ bude zadávať kritériá vyhľadávania . Napríklad používateľ chce hľadať určité priezvisko z databázy a on bude písať listy do vyhľadávacieho poľa . Keď sú nájdené zápas , budú záznamy sa zobrazia v mriežke . V časti kódu , prejdite na " Text1_Change ( ) " akcia a vstupný kód podobný nasledujúcemu :

Dim t As String

Ak Text1.Text < > " " ThenIf Adodc1 . Recordset.RecordCount < > 0 Thent = " * " + Text1.Text + " * " Adodc1.Recordset.Filter = " Priezvisko , ako " " + t + " ' " End IfElseAdodc1.Recordset.Filter = adFilterNoneEnd Ak

7

Stlačením tlačidla " F5 " pre spustenie projektu . Otestujte program a skontrolujte , či beží tak , ako má .
8

Uložte projekt kliknutím na " Súbor > Uložiť projekt ako " z menu a poskytujúce popisný názov .

• Predchádzajúca strana: Ako vytvoriť súbor z textového poľa v VB6 
• Ďalšia strana: Ako dešifrovať súbor , ktorý bol zašifrovaný v Blowfish