Clear text -alle tekstbokser

[luser32]

Er det noen komando for dette?

 

Jeg har en knapp, som når du trykker på den, skal kjøre en kommando som

Me.textboxer.clear eller noe sånn.

 

Er dette mulig, eller må jeg skrive oinn alle tekstbokser som jeg skal fjerne teksten fra?

 

Bruker VB2005

[GeirGrusom]

For Each c As Control In Me.Controls
 If c.GetType().Equals(GetType(System.Windows.Forms.TextBox)) Then
   Dim t As System.Windows.Forms.TextBox = c
   t.Text = ""
 End If
Next

 

Det den gjør, er å gå igjennom alle kontrollene på formen, hvis en control er en textbox, setter den teksten til ""

[luser32]

Fint, takk=)

 

Tester det senere idag;)

[luser32]

Hmm, det var rart, det funka ikke:S

Når jeg tryker på cmdClear, så skjer det ingenting

Endret 24. oktober 2005 av luser32

[aadnk]

Det fungerer i hvert fall her. Er du sikker på at du har assosiert den gjeldene prosedyren med klikkhendelsen til knappen?

 

For å teste dette, kan du se om en meldingsboks kjøres, dersom du legger inn følgende:

 

MessageBox.Show("Dette er en test", "Test")

 

Får du opp en meldingsboks dersom du legger koden ovenfor inn i stedet?

[luser32]

Det tror jeg ikke, men det kan jo være:)

 

Uansett, så har jeg tekstboksene inne i en TabControl, skal sjekke om det har noe å si når jeg kommer hjem

[GeirGrusom]

Bytt ut Me med TabControl1 (eller hva du en har kalt den)

[luser32]

TabControl1 gikk ikke:(

 

Men hvis jeg bytter ut Me. Med hver at TabPages-ene, så går det:)

 

Tusen takk for hjelpen:D