Privates VorForm_Unload (Löschen als ganze Zahl)
Wenn txtbox1 = „hier“ dann hereinkommen
MsgBox „einbringen bitte Daten in erste area per informazioni“ te
txtbox1.SetFocus
Löschen = ausrichtet et
ElseIf txtbox2 = „hereinkommen hier“ dann
MsgBox „einbringen bitte Daten in zweite area per informazioni“ te
txtbox2.SetFocus
Löschen = ausrichtet et
Beenden wenn
Unterseeboot beenden
|