Start VB6 1 en wijzigen van de vooraf gemaakte Form ( user interface venster ) naar uw wens . Met behulp van de muis en het paneel woningen op de onderste rechterkant , kunt u alle aspecten van het formulier , zoals de grootte , de titel en de kleuren te veranderen. Kopen van 2

Laad de VS FlexGrid controle. Uit het menu " Project " , klik op " Components . " U krijgt een dialoogvenster te zien met verschillende tabbladen . Kies het tabblad " Controls " , en een lijst van enkele " VideoSoft " producten zullen verschijnen , waaronder een voor " VSFlexGrid . " Selecteer deze controle ( zet een vinkje in het vakje ernaast ) en druk op de knop "OK " . U ziet nu een nieuw pictogram in de controles gereedschap strip aan de linkerkant .
3

Selecteer het nieuwe pictogram en teken een geschikte raster op uw formulier . In het deelvenster rechtsonder , verandert de naam van het raster om "VS . " Vervolgens met de rechtermuisknop op de grid en selecteer "Eigenschappen " uit het pop - up menu . U zal worden gepresenteerd met een dialoogvenster met verschillende tabbladen met verschillende eigenschappen ( bv kleur ) van het raster . Verander de volgende eigenschappen naar uw wens .
4

Voor testdoeleinden maken wat tekst headers voor elke kolom op de grid . Dit kan worden bereikt door te dubbelklikken op het formulier ( overal, maar op de grid ) . U zal worden genomen met een coderende venster waarin u code kunt opgeven om te worden uitgevoerd . Uw cursor zou moeten verschijnen binnenkant van de juiste subroutine sectie . Binnen deze subroutine , typt u het volgende :

VS.Row = 0

VS.Col
= 0

VS.Text
= " Auto "

VS
. Col = 1

VS.Text = " Schip "

VS.Col = 2

VS.Text = " Airplane "
5

Ga terug naar het formulier raam en maak twee knoppen . U kunt dit doen door in de controles strip aan de linkerkant de " deCommandButton " icoon (lijkt op een knop ) te selecteren en vervolgens het tekenen van de knoppen op het formulier . Met behulp van het paneel eigenschappen aan de onderkant rechts , verander de titel van een knop om " verbergen " en de andere op " Toon ".
6

Dubbelklik op de knop met het label , " verbergen " en u zullen worden genomen om een codering venster met de cursor in de juiste subroutine . Typ de volgende code in die subroutine :

VS.ColHidden
( 1 ) = True

Evenzo , dubbelklikt u op de knop met het label , " Show" en typ de volgende code in de nieuwe subroutine :

VS.ColHidden
( 1 ) = False

Test 7 het programma door op de afspeelknop ( het zijwaarts wijzende driehoekje ) op de bovenste horizontale werkbalk . Dat zou moeten leiden tot het formulier met het rooster en de twee knoppen . Je moet de eerste drie velden van het raster bestempeld als " Auto ", " Ship" en " Airplane zien . " Wanneer u op de "Hide "-knop , dient u de " Ship" kolom verdwijnen . Druk op de " Show" knop en je moet zien de kolom weer verschijnen .