Selvom Visual Basic 6 ( VB6 ) er blevet afløst af Visual Basic.Net række programmering pakker , VB6 stadig har et stort følge . En del af årsagen til dette er, fordi VB6 er lettere at bruge end sine . Net modpart og har høstet en lang række nyttige add -on værktøj. Et af disse værktøjer er FlexGrid kontrol , oprindeligt fra VideoSoft ( VS ) . Denne add-on giver kraftfulde regneark -lignende funktionaliteter til VB6 i en let at bruge pakke . En af de smarte funktioner, som VS FlexGrid kontrol er evnen til at skjule kolonner med data. Instruktioner
1
Start VB6 og ændre pre -skabte Form ( brugergrænseflade vindue) til din smag. Brug musen og egenskaber ruden på den nederste højre side , kan du ændre alle aspekter af formular , såsom størrelse, titel og farver.
2
Indlæs VS FlexGrid kontrol. Fra " Projekt "-menuen , klik på " Komponenter ". Du vil se en dialogboks med flere faneblade. Vælg " Controls " fanen, og en liste over flere " VideoSoft " produkter vil blive vist , herunder en for " VSFlexGrid ". Vælg denne kontrol ( sætte en check i boksen ved siden af det), og tryk på " OK " knappen. Du skulle nu kunne se et nyt ikon i kontrollerne værktøjet stribe på venstre side.
3
Vælg det nye ikon og tegne en passende gitter på din formular . I det nederste højre rude , ændre navnet på nettet til " VS ". Højreklik derefter på gitteret , og vælg "Egenskaber" fra pop- up -menuen. Du vil blive præsenteret med en dialogboks med flere faneblade , der indeholder forskellige egenskaber ( f.eks farve) af risten. Ændre disse egenskaber til din smag.
4
testformål , skabe nogle tekstoverskrifter for hver kolonne på nettet . Dette kan opnås ved at dobbeltklikke på den formular ( overalt men på nettet) . Du vil blive taget til en kodning vindue, hvor du kan angive kode, der skal køres. Markøren skal vises indersiden af passende subrutine afsnit. Inden for denne subrutine skrive følgende : Hej
VS.Row = 0
VS.Col = 0
VS.Text = "Car "
VS . Col = 1
VS.Text = " Skib "
VS.Col = 2
VS.Text = " Airplane "
5 < p > Gå tilbage til formular vinduet og oprette to knapper . Du kan gøre dette ved at vælge " CommandButton " ikonet (ligner en knap ) i kontrollerne stribe på venstre side , og derefter trække knapperne på formular . Brug ruden Egenskaber nederst til højre side, ændre billedteksten på en knap for at "skjule" og den anden til "Show ".
6
Dobbeltklik på knappen , "Hide ", og du der vil blive taget til en kodning vindue med markøren inden for den relevante underprogram. Indtast følgende kode i denne subrutine : Hej
VS.ColHidden (1) = Sand
Tilsvarende dobbeltklikke på knappen mærket "Show ", og skriv følgende kode i den nye subrutine : Hej
VS.ColHidden (1) = False
7
Test programmet ved at trykke på play-knappen ( den sidelæns trekant, der peger ) på den øverste vandrette værktøjslinje. Det burde bringe op formular med nettet og de to knapper. Du skulle se de første tre felter i gitteret mærket som "Car ", " Ship " og " Airplane ". Når du trykker på knappen "Skjul" , bør du se på " Ship " kolonnen forsvinde. Tryk på " Vis" knappen og du bør se kolonnen vises igen .