Приватное Sub Form_Unload (Cancel как интежер)
Если txtbox1 = «входят здесь» после этого
MsgBox «пожалуйста вписывает данные в первый textbox»
txtbox1.SetFocus
Cancel = True
ElseIf txtbox2 = «входит здесь» после этого
MsgBox «пожалуйста вписывает данные в второй textbox»
txtbox2.SetFocus
Cancel = True
Закончитесь если
Закончите подводную лодку
|