Differenze tra le versioni di "Aggiungere oggetti in una determinata linguetta"
Da Gambas-it.org - Wikipedia.
(Nuova pagina: Il caso è quello in cui si intende inserire uno o più oggetti via codice in una linguetta della ''TabStrp''. Facciamo l'esempio in cui abbiamo una ''TabStrip'', formata da tre ling...) |
|||
| Riga 10: | Riga 10: | ||
| − | '''Public Sub Button1_Click() | + | '''Public''' Sub Button1_Click() |
Dim bt As Button | Dim bt As Button | ||
Versione delle 04:59, 12 dic 2012
Il caso è quello in cui si intende inserire uno o più oggetti via codice in una linguetta della TabStrp.
Facciamo l'esempio in cui abbiamo una TabStrip, formata da tre linguette. Intendiamo inserire, cliccando su un tasto, un Button all'interno della seconda linguetta:
Public Sub Form_Open()
TabStrip1.Count = 3
End
Public Sub Button1_Click()
Dim bt As Button
' Individuiamo la seconda linguetta:
TabStrp1.Index = 2
With bt = New Button(TabStrip1)
.X = 40
.Y = 100
.W = 100
.H = 50
.Text = "Nuovo tasto"
End With
End
