|
Création de messages conviviaux dans votre application de base de données Access peut être plus efficace que l'affichage du message d'erreur par défaut . Dans Visual Basic pour Applications (VBA) , utilisez le "On Error GoTo " déclaration à intercepter les erreurs et de diriger le flux de procédure à l'endroit des états de gestion des erreurs . Créer un message d'erreur descriptif en utilisant une boîte de message qui informe l' utilisateur sur l'erreur et peut-être sur la façon d'y remédier. Instructions
1 Cliquez sur " Base de données Outils ", puis " Visual Basic " pour ouvrir l'éditeur Visual Basic de Microsoft . Cliquez sur le menu "Insertion ", puis " Module " pour ajouter un nouveau module de code
2 créer un nouveau sous procédure : .
Private Sub createErrorMessage ()
On Error GoTo Err_createErrorMessage :
3 créer une variable de chaîne que vous allez utiliser pour générer une erreur :
myData Dim As String
myData = " 1234567 "
4 Ajoutez le code suivant pour générer une erreur en ajoutant "-1" à la propriété length de la fonction «de gauche» :
myData = gauche (0 , -1)
5 Tapez le code suivant pour capturer l'erreur et créer un message d'erreur informant l'utilisateur sur l'erreur :
Exit_createErrorMessage : Photos Exit Sub
Err_createErrorMessage :
MsgBox " erreur: . longueur doit être supérieure à zéro " , vbCritical
End Sub
6 Appuyez sur " F5" pour exécuter la procédure sous et afficher la réponse .
|
