Jak jsem se zprávou se objeví, když je něco, co vstoupil do textového pole a stisknutí tlačítka?

hlasů
0

Je možné, aby se zprávou pop-up se objeví, když je něco napsáno v textovém poli? Nezáleží na tom, aby mi to, co textové pole ve skutečnosti se chci zpráva se objeví po stisknutí tlačítka a je text v textovém poli.

Níže je to, co jsem v současné době:

Private Sub cmdReg_Click()

CurrentDb.Execute INSERT INTO qryShowAll(Student_FirstName, Student_LastName, Parent_FirstName, Parent_LastName, AddressLine, City, State, Zip, PhoneNumber) VALUES (' & Me.txtStudentFirst &  ','  & Me.txtStudentLast & ',' & Me.txtParentFirst &  ','  & Me.txtParentLast & ',' & Me.txtAddress &  ','  & Me.txtCity & ','  & Me.txtState & ',' & Me.txtZip & ',' & Me.txtNumber & ')

If (txtStudentFirst,txtStudentLast,txtParentFirst,txtParentLast,txtAddress ,txtCity,txtState,txtZip,txtNumber) =  

MsgBox The student was successfully registered., vbOKOnly, Student Registered!

Else
MsgBox Student was not registered, please complete the form., vbOKOnly, 

End If
Položena 27/11/2018 v 17:50
zdroj uživatelem
V jiných jazycích...                            


1 odpovědí

hlasů
0

Jednou z možností je použít znaménko + pro zřetězení textových polí. To bude mít za následek Null, pokud ani jeden je Null. Tento přístup vyžaduje nastavení textových polí v tabulce neumožní prázdný řetězec.

If  IsNull(txtStudentFirst + txtStudentLast + txtParentFirst + txtParentLast + txtAddress + txtCity + txtState + txtZip + txtNumber) Then
    MsgBox "Student was not registered, please complete the form.", vbOKOnly
Else
    MsgBox "Student was successfully registered.", vbOKOnly, ""
End If

Eventuálně můžete nastavit pole, jak je požadováno v tabulce a nechat Access Nag uživateli dokončit. Můžete také použít Ověřovací a ValidationText vlastnosti pomáhají zajistit zadání dat.

Odpovězeno 27/11/2018 v 18:18
zdroj uživatelem

Cookies help us deliver our services. By using our services, you agree to our use of cookies. Learn more