Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Otvorte nový projekt kliknutím na šablóne " Štandardné EXE " pri Visual Basic zaťažení . Double - kliknite na " textové pole " kontrola v " Toolbox " v ľavom paneli na obrazovke , zastúpené na malom námestí obsahujúce malé písmená " AB " v pravom hornom rohu panela . Túto akciu opakujte ešte trikrát , takže môžete skončiť so štyrmi boxy na formulári .
2
Presuňte políčka seba , pretože každý z pridanej okno zakrýva predchádzajúcej jeden . Kliknite na top - box a pretiahnite ju z cesty . Opakujte oddeliť všetky štyri krabice . Kliknite na prvé pole sa zobrazí jeho vlastnosti v stĺpci na pravej strane obrazovky . Prejdite nadol , až uvidíte " tabindex " vlastnosť . Táto vlastnosť by mala byť 1 od záložkami štandardne k objednávke pridané .
3
Udržujte " tabindex " čísla v poradí , ak pridáte alebo odstránite krabice , etikety a iné objekty alebo zmenu poradie vystúpenie na formulári .
Formátovanie a vymedzenie sa záložkami
4
Pridať " CommandButton " do podoby z ustanovenia § 1 dvojitým kliknutím na ikonu v " Toolbox " , zobrazí ako malý obdĺžnik v druhej rade kontrol .
5
Pridať na základné kód jazyka Visual jazyka na text alebo čísla , ktorá by sa mala objaviť do stĺpcov pomocou výrazu " vbTab " alebo " TAB (n ) , " s " n" predstavuje presný počet medzier , pre presnejšie medzery . Kliknite na " Zobraziť /Code " v hornom menu formuláre vytvorené v kapitole 1. Zadajte riadky kódu , ako sa objavujú nižšie :
Private Sub Command1_Click ( )
Dim column1 , column2 , Sloupec3 As String
Sloupec1 = " Meno "
column2 = " Priezvisko "
Sloupec3 = " Dátum narodenia "
Debug.Print column1 & vbTab a column2 a vbTab a Sloupec3
End Sub
6
Kliknite na tlačidlo " Command1 na formulári vidieť výsledky .
7
Zmeňte kód v kroku 2 takto preukázať pomocou záložiek pre vymedzenie poľa zapísané do textového súboru , ktorý je potom možné importovať do databázy
Private Sub Command1_Click ( )
Dim column1 , Column2 , Sloupec3 , tabfile As String
tabfile = " C : . \\ \\ testfile.txt "
column1 = " Meno "
column2 = " Priezvisko "
Sloupec3 = " Dátum narodenia "
Otvoriť tabfile Pre výstupné ako # 1
Print # 1 , Column1 ; Tab ( 20 ) ; Sloupec2 ; Tab ( 40 ) ; Sloupec3
Close # 1
Otvoriť tabfile Pre vstup ako # 1
tabfile = vstup ( LOF ( 1 ) , 1 )
Debug.Print tabfile
Close # 1
End Sub
( pozri Referencie 3 )
Vytvorenie Tab objektov v aplikácii
8
uložiť projekt vytvorený v kapitole 1 , časť 1 s názvom vášho výberu . Vytvorenie nový projekt výberom " Štandardné EXE " šablóny . Pridať dve doplňujúce ovládacie prvky kliknutím na " projekt " , " súčasti " v jazyku Visual Basic v ponuke na najvyššej úrovni . Prejdite nadol v zozname zložiek nájsť " Dialóg ovládací prvok Microsoft kartách 6.0 " a " Microsoft windows Common Controls 6.0 ( SP6 ) . " Kliknite na " voľbu " vedľa seba vložiť začiarknutie a " OK " a pridajte ich do " Toolbox " .
9
Vyhľadajte " TabStrip " riadenie , štvorček s apostrofom hore a " SSTab " riadenie , ikona pripomínajúca štipcom okuliare v " Toolbox " . Ak ste nepridali žiadne ďalšie ovládacie prvky , ako by mala byť v šiestom riadku . Zvýraznenie im prinesie až jej meno . Poklepaním na každý umiestniť ich na formulári . Presuňte je od seba , umiestnenie " TabStrip " nad " SSTab . " Pridať " textové pole " dvojitým kliknutím na túto ikonu " Toolbox " . Drag je pod SSTab .
10
pravým tlačidlom myši na ovládací prvok " TabStrip " a zobrazí sa jeho vlastnosti . Štyri karty sa objaví v hornej časti . Kliknite na druhom , " Tabs . . " Každá z kariet na formulári sám má " index " a " titulok " . Majetku a navyše ostatné Zadajte tieto titulky pre každú kartu indexovaný , kliknite na tlačidlo " OK "
Index 1 : " Vstup "
Index 2 : " Nový užívateľ "
Index 3 : Odoslať užívateľské meno "
Index 4 : Odoslať heslo
11
Dvakrát kliknite na " TabStrip " ovládanie otvorte okno kód a vložte tieto riadky kódu :
Private Sub TabStrip1_BeforeClick ( Cancel As Integer )
Select Case TabStrip1.SelectedItem.Index
prípad 4
MsgBox " Vložiť login a pwd kód tu . "
Case Else
MsgBox " môžete vytvoriť ďalšie akcie spojené s kartami v tejto móde . "
End Select
End Sub
Stlačte " F5 " spustiť túto časť aplikácie . Skúste kliknúť na jednotlivých záložkách niekoľkokrát tam a späť . ( Pozri Referencie 4 )
12
Sledujte procesu v kroku 3 , teraz pomocou ovládacieho prvku SSTab . V " TabCaptions " na karte " Všeobecné " . Použite ľavú a pravú šípku vedľa " Current Tab " premenovať titulky z omeškania takto : klipart
Tab 0 : " Pridať nový formulár "
Tab 1 : " Zobraziť nový formulár "
Tab2 : " Kalkulačka "
13
Zobrazí okno kód znovu a pridať tieto riadky :
Private Sub SStab1_click ( SelectedTab As Integer )
Static Aktívne As Boolean
Ak Aktívne Potom Exit Sub
Active = true
Vyberte Case SelectedTab
Case 0
Text1 = " Pridať požadovanej ďalší krok na kódovanie . "
Prípad 1
Text1 = " Pridať novú stránku pre zobrazenie v kódovaní " klipart
Prípad 2
Text1 = " Pridať zobraziť kalkulačku . "
End Select
Active = false
End Sub
Stlačte " F5 " pre spustenie aplikácie a kliknite na tlačidlo na rôznych kartách . ( Pozri Referencie 5 )