Дипломная работа: Автошкола "Кадиллак"

End Sub

Поле “Дом. телефон”:

Private Sub ed_phone_Change()

ed_phone.Text = Val(ed_phone.Text)

End Sub

Поле “Квартира ”:

Private Sub ed_room_Change()

ed_room.Text = Val(ed_room.Text)

End Sub

Поле “Серия ”:

Private Sub ed_ser_Change()

ed_ser.Text = Val(ed_ser.Text)

End Sub

Активация формы :