• 
  

  hur man använder flikar i Visual Basic

  
  

Visual Basic flikar tjäna fyra olika funktioner . Flikar ger sjöfart i former ; tjäna som utrymme markörer för utskrift av text med hjälp av Visual Basic , fungera som avgränsare mellan textfält för databaser , och visa flikar dialogrutor i program . Två kontroller , " TabStrip " och " SSTab , " är en del av Visual Basic array med kontroll objekt . Välja mellan TabStrip och SSTab kontroll är ett beslut som programmeraren måste göra beroende på de individuella egenskaperna hos varje . Den TabStrip är mer komplicerat att utveckla , men har fler funktioner , medan SSTab kontrollen erbjuder snabbare utveckling .

Du behöver :
Visual Basic 6
. 0 .


Navigera formulär med hjälp av flikar


1 .
Öppna ett nytt projekt genom att klicka på " Standard EXE " mallen när Visual Basic laster . Dubbelklicka på " TextBox " kontroll i " Verktyg " i den vänstra panelen i skärmen , representeras av en liten fyrkant som innehåller den gemena bokstäver " AB " längst upp till höger i verktygslådan . Upprepa detta tre gånger så att du hamnar med fyra rutor på blanketten .
2 .
Dra rutorna isär eftersom varje ruta la täcker upp den föregående . Klicka på den översta rutan och dra den ur vägen . Upprepa för att separera alla fyra rutor . Klicka på den första rutan för att visa dess egenskaper i en kolumn till höger på skärmen. Bläddra ner tills du ser " tabIndex " egendom . Denna fastighet bör vara en 1 eftersom flikarna standard till beslutet läggs till.
3 .
Håll " tabIndex " siffror i ordning om du lägger till eller tar bort lådor , etiketter och andra föremål eller ändra ordningen på utseendet på blanketten .


Formatera och avgränsa med flikar


1 .
Lägg till ett " CommandButton " till formen från avsnitt 1 genom att dubbelklicka på ikonen i "Toolbox ", visas som små rektangel i den andra raden av kontroller .
2 .
Lägg
Visual Basic språkkod till text eller tal som ska visas i kolumner med hjälp av begreppet " vbTab "eller " TAB ( n ) " med " n " motsvarar det exakta antalet platser , för mer exakt avstånd . Klicka på " Visa /Code " i toppmenyn i formuläret skapas i avsnitt 1. Ange kod linjer som de visas nedan :



Sub Command1_Click ( )

Dim kolumn1 , kolumn2 , column3 As String

kolumn1=" Förnamn "

kolumn2=" Efternamn "

column3=" Födelsedatum "

Debug . Skriv kolumn1 vbTab kolumn2 vbTab column3

End Sub
3 .
Klicka på " Kommando1 knappen i formuläret för att se resultat .
4 .
Ändra koden i steg 2 på följande sätt för att visa använder flikar för att avgränsa områden skrivas till en textfil , som sedan kan importeras till en databas .



Sub Command1_Click ( )

Dim kolumn1 , kolumn2 , column3 , tabfile As String

tabfile=" C: \ \ testfile. txt "

kolumn1=" Förnamn "

kolumn2=" Efternamn "

column3=" Födelsedatum "

Öppna tabfile för utskrift som # 1

Skriv # 1 , kolumn1 , Tab (20) , kolumn2 , Tab (40 ) , column3

Stäng # 1

Öppna tabfile För Input som # 1

tabfile=Ingång ( LOF (1) , 1)

Debug . Skriv tabfile

Stäng # 1

End Sub



( se referenser 3 )


Skapa Tab Objekt i en ansökan


1 .
Spara projektet skapade i avsnitt 1 , steg 1 med ett namn som du väljer . Skapa ett nytt projekt att välja " Standard EXE " mall . Lägg till två kompletterande kontroller genom att klicka på " Projekt "," komponenter " i den översta nivån Visual Basic -menyn . Bläddra nedåt i listan över komponenter för att hitta " Microsoft flikar Dialog Control 6,0 " och "Microsoft Windows Common Controls 6 . 0 ( SP6 ) . "Klicka på " Kryssruta " bredvid varje infoga en bock och " OK " för att lägga till dem i "Toolbox ".
2 .
Leta upp " TabStrip " kontroll , en fyrkantig låda med en apostrof i toppen och " SSTab " kontroll , en ikon som liknar PINCENE glasögon i " verktygslådan. "Om du har inte lagt till några andra kontroller , bör både vara i sjätte raden . Markera dem kommer att ta upp namn . Dubbelklicka på varje för att placera dem på blanketten. Dra isär dem , placera " TabStrip " ovanför " SSTab . " Lägg till " TextBox " genom att dubbelklicka på denna "Verktyg "-ikonen . Dra den under SSTab .
3 .
Högerklicka på " TabStrip " kontrollen för att visa dess egenskaper . Fyra flikar visas högst upp . Klicka på den andra, " Tabs . " Var och en av flikarna på själva formuläret har en " index " och ett " Caption " egendom plus andra . Ange dessa bildtexter för varje indexerade flik och klicka på " OK ".



Index 1 : "Logga in "

Index 2 : "Ny användare "

Index 3: Skicka Användarnamn "

Index 4 : Skicka lösenord
4 .
Dubbelklicka på " TabStrip " kontrollen för att öppna kodfönstret och skriv in dessa rader kod :



Private Sub TabStrip1_BeforeClick ( Avbryt As Integer )

Select Case TabStrip1. SelectedItem. Index

mål 4

MsgBox " Sätt login och pwd koden här . "

Case Else

MsgBox " Du kan skapa andra åtgärder som är associerade med flikarna på detta sätt . "

End Markera

End Sub



Tryck "F5 " för att köra denna del av ansökan . Prova att klicka på alla flikarna flera gånger fram och tillbaka . (Se referenser 4 )
5 .
Följ processen i steg 3 , använder nu SSTab kontroll . Den " TabCaptions " är på fliken "Allmänt" . Använd vänster och höger pilarna bredvid " Nuvarande Tab " för att byta namn på bildtexter från standard på följande sätt:



Tab 0 : " Lägg till ny form "

Tab 1: " Visa ny form "

Flik2 : " Calculator "
6
Visa koden fönstret igen och lägga till dessa rader : .



Private Sub SStab1_click ( SelectedTab As Integer )

Statisk aktiv som Boolean

Om Active Då Exit Sub

Aktiv=Sant

Select Case SelectedTab

mål 0

Text1=" Lägg till önskade nästa steg att kodning . "

Fall 1

Text1=" Lägg till en ny sida som ska visas i kodning "

Fall 2

Text1=" Lägg att visa en miniräknare . "

End Markera

Aktiv=False

End Sub



Tryck "F5 " för att köra programmet och klicka på de olika flikarna . (se referenser 5 )


tips och varningar




Den faktiska innehållet i texten visas i tabbing avsnitten är exempel . Genom att skriva mer omfattande kod , du aktiverar till användaren att visa information , köra andra beräkningar eller program eller vad aktiviteter du vill vidtas av följande på fliken länkar .

Egenskaperna för dessa kontroller innehåller flera alternativ för visning . Utforska dessa att justera kontrollerna .

rader kod för SSTab kontroll kring "aktivt " fall måste finnas för att förhindra rekursiva steg på grund av hur "klick" vid bränder när välja en av flikarna . Utan denna kod , kan processen fortsätta springa .

Previous：nothing Next：hur du ställer in fokus på ett annat fönster med hjälp av Visual Basic

Relaterade artiklar