Visual Basic tabs dienen vier verschillende functies . Tabbladen bieden navigatie binnen vormen , dienen als ruimte markers voor het afdrukken van tekst door middel van Visual Basic ; fungeren als scheidingstekens tussen tekstvelden voor databases , en weer tabbladen dialoogvensters in toepassingen . Twee controles , " TabStrip " en " SSTab , " maken deel uit van de Visual Basic serie van controle objecten . Kiezen tussen de TabStrip en SSTab controle is een beslissing van de programmeur moeten maken , afhankelijk van de individuele eigenschappen van elk . De TabStrip is ingewikkelder om te ontwikkelen , maar heeft meer functies , terwijl de SSTab controle biedt snellere ontwikkeling . Wat je nodig hebt Visual Basic 6.0 Toon Meer Aanwijzingen Navigeren Formulieren gebruiken Tabs 1 Open een nieuw project door te klikken op de "Standard EXE " template wanneer Visual Basic ladingen . Dubbelklik op de " TextBox " controle in de " Toolbox " in het linkerpaneel van het scherm , weergegeven door een klein vierkantje met daarin de kleine letters " ab " in de rechterbovenhoek van de Toolbox . Herhaal dit drie keer , zodat je eindigt met vier vakjes op het formulier . Kopen van 2 Sleep de dozen uit elkaar omdat elk vakje toegevoegd dekt de voorgaande. Klik op de bovenste vak en sleep deze uit de weg . Herhaal dit tot alle vier dozen scheiden . Klik op de eerste doos om zijn eigenschappen in een kolom aan de rechterkant van het scherm weer te geven . Scroll naar beneden tot je de ' TabIndex " eigenschap . Deze eigenschap moet een 1 omdat de tabbladen standaard om de bestelling toegevoegd . 3 Houd de " TabIndex " nummers in orde als je dozen , etiketten , en andere voorwerpen of verandering toevoegen of verwijderen de volgorde van verschijning op het formulier . formatteren en Begrenzing met Tabs 4 toevoegen " CommandButton " om het formulier uit paragraaf 1 door te dubbelklikken op het pictogram in de " Toolbox ", weergegeven als kleine rechthoek in de tweede rij van de controles . 5 in de Visual Basic taal code om tekst of getallen die moet worden weergegeven in kolommen door gebruik van de term " vbTab " of " TAB ( n ) " met " n" vertegenwoordigt het exacte aantal, voor meer nauwkeurige afstand . Klik op "View /Code " in het bovenste menu van de vorm die in paragraaf 1 . Vul de code regels zoals ze hieronder weergegeven : Private Sub Command1_Click ( ) Dim column1 , kolom2 , column3 als Koord kolom1 = " Voornaam" kolom2 = "Achternaam " column3 = " Geboortedatum " Debug.Print kolom1 & vbTab & kolom2 & vbTab & column3 End Sub < br > 6 Klik op de " Command1 knop op het formulier om de resultaten te zien . 7 Wijzig de code in stap 2 als volgt aan te tonen met behulp van Tabs om velden geschreven naar een tekstbestand af te bakenen , die vervolgens kunnen worden geïmporteerd in een databank Private Sub Command1_Click ( ) op Dim column1 , kolom2 , column3 , tabfile als Koord tabfile = " c: . \\ \\ testfile.txt " Kolom1 = " Voornaam " kolom2 = " Achternaam " column3 = " Geboortedatum " Open tabfile Voor Output Zoals # 1 Print # 1 , kolom1 ; Tab ( 20 ) ; kolom2 ; Tab ( 40 ) ; column3 Close # 1 Open tabfile Voor Input Zoals # 1 tabfile = Input ( LOF ( 1 ) , 1 ) Debug.Print tabfile Close # 1 End of Sub ( zie Referenties 3 ) creëren Tab Objecten in een Application 8 Sla het project gemaakt in paragraaf 1 , Stap 1 met een naam van uw keuze. Maak een nieuw project kiezen van de " Standard EXE " template . Voeg twee aanvullende controles door te klikken op " project ", " componenten" in de top- level Visual Basic -menu . Scroll naar beneden de lijst met onderdelen te vinden " Microsoft Tabbed Dialog Controle 6.0 " en " Microsoft Windows Common Controls 6.0 ( SP6 ) . "Klik op de " Checkbox " naast elkaar om een vinkje te plaatsen en op" OK " om ze toe te voegen aan de ' Toolbox '. 9 Zoek de" TabStrip "control , een vierkante doos met een apostrof aan de bovenkant en de " SSTab "control , een icoon lijkt lorgnet bril in de " Toolbox . "Als je een andere besturingselementen niet hebt toegevoegd , moet zowel in de zesde rij . Highlighting hen zal brengen van de naam . Dubbelklik op elk om ze op het formulier . Sleep ze uit elkaar , het plaatsen van de " TabStrip " boven de " SSTab . " toevoegen " TextBox " door te dubbelklikken op dit " Toolbox " icoon . Drag deze onder de SSTab . 10 Klik met de rechtermuisknop op de " TabStrip " controle om zijn eigenschappen . Vier tabbladen verschijnen bovenaan . Klik op de tweede , " tabbladen bevatten . " Elk van de lipjes op het formulier zelf heeft een " Index " en een " Caption " . Woning plus anderen Voer deze bijschriften voor elk tabblad geïndexeerde , klik op" OK " Index 1 : " . Login " < br Index > 2 : " New User" Index 3 : Stuur Gebruikersnaam " Index 4 : Verstuur wachtwoord 11 Dubbelklik op de " TabStrip " controle met betrekking tot de code-venster te openen en voer de volgende regels code : Private Sub TabStrip1_BeforeClick ( Cancel As Integer ) Select Case TabStrip1.SelectedItem.Index case 4 MsgBox " Insert login en pwd code hier . " case Else MsgBox " U kunt andere acties in verband met de tabbladen op deze manier te maken . " < br End > Selecteer End Sub Druk op " F5 " om dit deel van de toepassing uit te voeren . Klik op elk van de lippen een paar keer heen en weer . ( Zie Verwijzingen 4 ) op Twitter 12 Volg het proces in stap 3 , nu met behulp van de SSTab controle . De " TabCaptions " op het tabblad " Algemeen " . Gebruik de pijlen links en rechts naast de "Current Tab " om de bijschriften hernoemen van de standaard als volgt : Tab 0 : " Voeg nieuwe vorm " Tab 1 : " Geef nieuwe vorm " Tab2 : " Calculator " 13 Geef het venster code opnieuw en voeg deze lijnen : Private Sub SStab1_click ( SelectedTab As Integer ) op Twitter Statische Actieve zoals Van Boole Als Active dan Exit Sub Actief = True Selecteer Case SelectedTab Case 0 Text1 = " Zet de gewenste volgende stap te coderen . " Geval 1 Text1 = " Voeg een nieuwe pagina in de codering om" Geval 2 Text1 = " In een rekenmachine weer te geven . " End of Selecteer Actief = False End of Sub Druk op "F5 " om de toepassing uit te voeren en klik de verschillende tabs . ( Zie Referenties 5 ) op Twitter
|