Cancellare il testo presente in uno o più Controlli di testo posti su una TabPanel

Da Gambas-it.org - Wikipedia.
Versione del 19 mag 2024 alle 13:01 di Vuott (Discussione | contributi)

(diff) ← Versione meno recente | Versione attuale (diff) | Versione più recente → (diff)

Poniamo il caso in cui una TabPanel è costituita da quattro tabelle, ciascuna delle quali contiene un TextBox con un testo al suo interno.
Si intende cancellare - ad esempio cliccando un Button - il testo di ciascun TextBox presente nelle quattro tabelle della TabPanel.

Gli Oggetti TextBox potranno essere individuati mediante la Proprietà ".Controls" di Me.

Public Sub Button1_Click()

 Dim ob As Object

 For Each ob In Me.Controls
   If Object.Type(ob) = "TextBox" Then ob.Text = Null
 Next 

End