dank Eurer Mithilfe bin ich beim meinem "Projekt" schon gut vorangekommen. Ich habe noch ein paar Kleinigkeiten zu verschönern:
Wurde in der Textbox4 die Prüfziffer falsch eingegeben, erscheint eine MsgBox und der Focus wird wieder auf diese Textbox gesetzt, ansonsten wird der Focus auf die nächste Textbox5 gesetzt. So weit so gut:
...
If Pruefz > Val(TextBox4.Text) Then
msgprztext = "Achtung die richtige Prüfziffer lautet " & Pruefz & " !"
MsgBox (msgprztext)
TextBox4.SetFocus
Else
TextBox5.SetFocus
End If
...
Wurde die Prüfziffer falsch eingegeben, steht der Cursor dann hinter der falschen Ziffer. Es wäre schön, wenn der Inhalt der Textbox gleich markiert wäre. Über die EnterFieldBehavior-Eigenschaft geht das offenbar nicht (nur für Tab-Taste, nicht bei SetFocus). Wie kann man das lösen?
Danke fürs Grübeln ... viele Grüße
Thomas