In effetti il numero dei tab è variabile.
Allora il programma la prima volta che si avvia ha come numero di tab uno solo quindi il SSTab1.TabCaption(0) che posso metterci pure il titolo da interfaccia di programmazione che tanto non cambia mai.
Quindi da codice scrivo che la prima caption si chiama PIPPO.
Poi chiedo all'utente quante altri tab vuole.
Lui ha da scegliere fra una serie di valori da una combo-box (quindi 5 valori rigidi) ed in base a quello che scrive, al successivo riavvio, si titrova enne tab (salvati in un INI).
E fin qua va tutto.
Il problema è che questi tab (che se ne ha scelti 10 sono):
SSTab1.TabCaption(1)->SSTab1.TabCaption(11)
(infatti SSTab1.TabCaption(0) è default ed io faccio
SSTab1.Tabs = cmbFunzioniQuante.Text + 1) ma sinceramente questo non pensavo fosse un problema...
Quindi io avrei scritto:
codice:' Dimensionamento SSTab SSTab1.Tabs = cmbFunzioniQuante.Text + 1 Dim TitoloNum As Integer For TitoloNum = 1 To (cmbFunzioniQuante.Text + 1) SSTab1.TabCaption(TitoloNum)= TitoloNum & ". Famigliare" Next Titolo


Rispondi quotando