Oprettelse brugervenlige meddelelser i din Access-database ansøgning kan være mere effektiv end at vise standard fejlmeddelelse. I Visual Basic for Applications ( VBA ) , skal du bruge "On Error GoTo " erklæring til fælde fejl og lede procedure flow til placeringen af fejlhåndtering udsagn. Opret en beskrivende fejlmeddelelse ved hjælp af en besked boks , der vil informere brugeren om fejlen og eventuelt om, hvordan man kan løse det . Instruktioner
1
Klik på " Database Tools, " og derefter "Visual Basic " for at åbne Microsoft Visual Basic Editor. Klik på " Indsæt" menuen , derefter " Modul " for at tilføje en ny kode modul
2
Opret en ny sub procedure : .
Private Sub createErrorMessage ()
< p > Ved fejl GoTo Err_createErrorMessage :
3
Opret en streng variabel , som du vil bruge til at generere en fejl : Hej
Dim Mydata As String
Mydata = " 1234567 "
4
Føj følgende kode til at generere en fejl ved tilføjelse af "-1" til længden ejendom "Venstre" -funktion : Hej
Mydata = Venstre (0, -1)
5
Indtast følgende kode til at fange fejlen og oprette en fejlmeddelelse informerer brugeren om fejlen : Hej
Exit_createErrorMessage :
Exit Sub < br >
Err_createErrorMessage : Hej
MsgBox "Fejl: . længde skal være større end nul " , vbCritical
end Sub
6
Tryk på " F5 " at køre sub procedure og se svaret.