Textfelder auf einer Form

[BlearSun]

Warum geht das nicht?

Dim txt As TextBox

For Each txt In Form1

txt.Text = "HALLO"

Next

Ich kann mir das nicht erklären!

Danke

Fehlermeldung:

Typen unverträglich: Laufzeitfehler 13

[BlearSun]

Ich habs!

So:

Dim MyCtrl As Control

For Each MyCtrl In Form1.Controls

If TypeName(MyCtrl) = "TextBox" Then

MyCtrl.Text = "HALLO"

End If

Next