Visual Basic faner tjener fire forskellige funktioner . Faner giver sejlads i formularer , tjener som plads markører for udskrivning af tekst via Visual Basic , fungerer som skilletegn mellem tekstfelter til databaser og vise faneblade dialogbokse i applikationer . To kontroller , " TabStrip " og " SSTab ," er en del af Visual Basic vifte af kontrol objekter. Vælge mellem TabStrip og SSTab kontrol er en beslutning, skal programmøren gøre afhængig af de individuelle egenskaber af hver. Den TabStrip er mere kompliceret at udvikle , men har flere funktioner , mens SSTab kontrol giver hurtigere udvikling. Ting du skal
Visual Basic 6.0
Vis Flere Instruktioner
Navigering Forms Brug Tabs
1

Åbn et nyt projekt ved at klikke på " Standard EXE " skabelon når Visual Basic belastninger. Dobbelt-klik på " TextBox " kontrol i " Toolbox" i venstre panel på skærmen , repræsenteret ved en lille firkant , der indeholder de små bogstaver "AB" øverst til højre i værktøjskassen. Gentag denne handling tre gange mere , så du ender med fire bokse på formularen.
2

Træk kasserne fra hinanden , da hver boks tilføjet dækker op den foregående. Klik på den øverste boks og trække den ud af vejen . Gentag for at adskille alle fire bokse. Klik på det første felt for at vise dets egenskaber i en kolonne i højre side af skærmen. Rul ned, indtil du ser " TabIndex " ejendom . Denne ejendom skal være en 1 , da fanerne standard til kendelsen tilføjet.
3

Hold " tabindex " numre i orden, hvis du tilføjer eller sletter kasser , etiketter og andre objekter eller ændre rækkefølgen af ​​udseende på formularen.
formatering og afgrænsning med Tabs
4

Add a " CommandButton " til den form fra § 1 ved at dobbeltklikke på ikonet i "Toolbox ", vises som lille rektangel i den anden række af kontroller .
5.

Tilføj Visual Basic sproget kode til tekst eller tal , der skal vises i kolonner ved at bruge udtrykket " vbTab " eller " TAB (n ) " med " n" repræsenterer det præcise antal pladser, for mere præcis afstand . Klik på " Se /Code" i topmenuen i formularen oprettet i § 1 . Indtast kodelinjer , som de vises nedenfor : Hej

Private Sub Command1_Click ()

Dim kolonne1 , kolonne2 , kolonne3 As String

kolonne1 = "Fornavn "

kolonne2 = " Efternavn "

kolonne3 = " Fødselsdato "

Debug.Print kolonne1 & vbTab & kolonne2 & vbTab & kolonne3

End Sub
< br > 6

Klik på " Command1 knappen på formularen for at se resultaterne.
7

Skift koden i trin 2 som følger at demonstrere bruge Tabs at afgrænse områder, skrevet til en tekstfil , som derefter kan importeres i en database

Private Sub Command1_Click ()

Dim kolonne1 , kolonne2 , kolonne3 , tabfile As String

tabfile = "c: . \\ \\ testfile.txt "

kolonne1 = " Fornavn "

kolonne2 =" Efternavn "

kolonne3 =" Fødselsdato "

Open tabfile for output Som # 1

Print # 1, kolonne1 , Tab ( 20) kolonne2 , Tab ( 40), kolonne3

Close # 1

Open tabfile For Input Som # 1

tabfile = Input ( LOF (1) , 1)

Debug.Print tabfile

Close # 1

End Sub
< p > (Se Referencer 3 )
Oprettelse Tab objekter i en applikation
8

Gem projektet skabt i § 1 , trin 1 med et navn efter eget valg. Opret en nyt projekt vælge " Standard EXE " skabelon. Tilføj yderligere to kontroller ved at klikke på "Projekt ", " komponenter" i det øverste niveau Visual Basic menu. Rul ned på listen over komponenter, for at finde "Microsoft Tabbed Dialog Control- 6.0 " og " Microsoft Windows Common Controls 6.0 ( SP6 ) . "Klik på " Afkrydsningsfelt "ved siden af ​​hver for at indsætte et flueben og" OK "for at føje dem til " Toolbox ".
9

Find" TabStrip "kontrol, en firkantet kasse med en apostrof i toppen og" SSTab "kontrol , et ikon der ligner Lorgnet briller i " Toolbox ". Hvis du ikke har tilføjet nogen andre kontroller , bør begge være i den sjette række . fremhævning dem vil opdrage navnet. Dobbeltklik på hver at placere dem på formularen. Træk dem fra hinanden , at placere " TabStrip " over " SSTab . " Tilføj en " TextBox " ved at dobbeltklikke på denne " Toolbox" -ikonet. Drag den under SSTab .
10

Højreklik på " TabStrip " kontrol for at vise sine egenskaber. fire faner vises øverst . Klik på den anden , " faner . "Hver enkelt af fanerne på skemaet selv har en " Index "og en" Caption " . Ejendom plus andre Indtast disse billedtekster for hver indekseret fanen og klik på" OK "

Index 1 : " . Login " < br >

Index 2: " Ny Bruger "

Index 3 : Send brugernavn "

Index 4 : Send kodeord
11

Dobbeltklik på de " TabStrip " kontrol for at åbne kodevinduet og indtaste disse linjer kode : Hej

Private Sub TabStrip1_BeforeClick ( Cancel As Integer )

Select Case TabStrip1.SelectedItem.Index

Case 4 fotos

MsgBox "Indsæt login og pwd kode her. "

Case Else

MsgBox " Du kan oprette andre handlinger forbundet med tapperne i denne måde. " < br >

End Vælg

End Sub

Tryk på " F5 " for at køre denne del af ansøgningen. Prøve at klikke på hver af fanerne flere gange frem og tilbage . (Se Referencer 4 )
12

Følg processen i trin 3, nu bruger SSTab kontrol. De " TabCaptions " er på fanen "Generelt" . Brug venstre og højre pil ved siden af ​​" Current Tab" for at omdøbe billedtekster fra standard som følger : Hej

Tab 0: " Tilføj ny form "

Fane 1 : " Display ny form"

Fane2 : " Calculator "
13

Vis koden vinduet igen og tilføje disse linjer : Hej

Private Sub SStab1_click ( SelectedTab As Integer )
< p > Static aktiv som Boolean
p Hvis Active Så Exit Sub

Active = Sand

Vælg Case SelectedTab

Case 0

Text1 = " Tilføj den ønskede næste skridt at kodning. "

Case 1

Text1 = "Tilføj en ny side til at vise i kodning "

Case 2

Tekst1 = "Tilføj for at få vist en lommeregner. "

End Vælg

Active = False

End Sub

Tryk på " F5 " for at køre programmet, og klik om de forskellige faner. (Se Referencer 5 )