Hej
Jag har försökt med nedastående men får det inte att funka. Jag vill kunna tömma alla fält från text.
Någon som har ett bra förslag?

Private Sub ClearTextbox()

Dim c As Control
Dim t As System.Windows.Forms.TextBox

For Each c In Me.Panel1.Controls

If c.GetType Is t Then
c.Text = ""
End If

Next

End Sub

Joakim,

Vad är det som inte fungerar? Är det så att den möjligen bara tömmer några av dnia fält? Anledningen till detta är så att om du lagt textfält i t.ex Panel eller Groupbox (m.m.) så kommer du inte åt dessa. Vad du istället måste göra är att gå igenom alla kontrollers kontroller osv.

Gör en sökning i forumet så skall du se att du kan hitta liknande inlägg där detta behandlats.

Problemet är att jag kommer åt controllerna men kan inte i if satsen få den att fatta att det är textboxarna jag vill rensa. Med andra ord den kommer inte in i if satsen. Kör jag utan den så blir alla kontroller utan text så det funkar men jag vill bara rensa textboxarna.

Löst med denna lönar sig att leta lite bättre :)

Dim ctrl As Control
For Each ctrl In Me.Panel1.Controls
If TypeOf (ctrl) Is TextBox Then
ctrl.Text = String.Empty
End If
Next