Skapa användarvänliga meddelanden i din Access- databas ansökan kan vara mer effektivt än att visa meddelandet standard error . I Visual Basic for Applications ( VBA ) , använd " On Error GoTo " uttalande att fånga fel och rikta förfarandet flödet till platsen för Felhanteringselement uttalanden . Skapa ett beskrivande felmeddelande med en meddelanderuta som informerar användaren om felet och eventuellt om hur man rättar till det . Instruktioner
1
Klicka på " Databas Verktyg " och sedan " Visual Basic " för att öppna Microsoft Visual Basic Editor. Klicka på " Infoga " -menyn , sedan " modul " för att lägga till en ny kodmodul
2
Skapa en ny sub förfarande : .
Private Sub createErrorMessage ( ) katalog
On Error GoTo Err_createErrorMessage : Addera 3
Skapa en sträng variabel som du kommer att använda för att generera ett fel :
Dim MYDATA As String
Mydata = " 1234567 "
4
Lägg till följande kod för att generera ett fel genom att lägga till " -1 " till egenskapen length för " vänster" -funktion :
Mydata = Vänster ( 0 , -1 )
5
Skriv in följande kod för att fånga felet och skapa ett felmeddelande som informerar användaren om felet :
Exit_createErrorMessage :
Exit Sub
Err_createErrorMessage :
MsgBox " Error : . Längd måste vara större än noll " , vbCritical
End Sub
6
Tryck " F5 " att köra sub förfarandet och se svaret .
