Keskustelu: Ohjelmointikysymykset: VB6: TABit

Miten TABeihin saa laitettua tekstiä yms.

Lisää Tabiin tekstiruutu tai tekstikehys, johon saat haluamasi tekstin joko ominaisuutena tai ajon aikana kirjoittamalla (TextBox)

Otat Properties Windowista Custom ja sieltä muuttelet ja lisäilet tabeja :)

Mulla on monia tabeja, ja niihin pitäisi saada tekstiä, mutta miten saan valittua sen tabin sieltä ? En pysty muokkaamaan kuin sitä mikä on siinä edessä.

Klikkaat vaan haluamaasi TABia ja se siirtyy päällimmäiseksi

Tarvitset niin monta PictureBoxia kuin sulla on niitä TABeja. PictureBoxit pitää olla arrayssa, joten piirrä yksi boxi ja copy-paste tarvittavan monta kertaa. Kyselyyn vastaat Yes. Sitten ryhmittelet kaikki labelit ja textboxit sun muut PictureBoxeille, kullekkin yhden TABin tavarat. Seuraavalla koodilla sitten saat oikean TABin päällimmäiseksi.

Private Sub tabStrip1_Click()
   pic(tabStrip1.SelectedItem.Index - 1).ZOrder 0
End Sub

Huomaa, että kaikki pictureboxit on saman kokoisia ja että niiden Top ja Left arvot ovat samat.

Tässä on näköjään puhuttu eri kontrolleista. Olen tarkoittanut SSTab.kontrollia (TABCTL32.OCX) jota on hieman helpompi käsitellä kuin tuota tabsrtipiä. Molempiin voi lisätä kontrolleja suoraan ja myös kuvan taustalle ilman pictureboxejakin.