Vous pouvez programmer à l'aide " if ... else " déclarations contenues dans votre demande d'accès à l'aide de Visual Basic pour applications, mais vous pouvez avoir un programme plus propre en utilisant "select ... case " déclarations lieu . Cette instruction s'exécute un des nombreux groupes d'états en fonction de la valeur de l'expression de test . L' expression de test la plus courante est un nombre entier ou une variable de chaîne . Si la valeur de l'expression de test correspond à l'étiquette de cas, alors le code suivant l'étiquette de cas sera exécutée. Instructions
1

Cliquez sur " Database Tools " et cliquez sur " Visual Basic " pour démarrer l'éditeur Visual Basic . Cliquez sur le menu "Insertion " et cliquez sur "Module " pour ajouter un nouveau module
2

Copiez et collez ce qui suit pour commencer une nouvelle sous et de créer les variables que vous utiliserez dans votre instruction Select Case . : Photos

instructionDeSélection retournant Private Sub ()

expressionStr Dim As String

expressionInt Dim As String

expressionStr = "3"

expressionInt = 1
3

Copiez et collez le code suivant pour créer une nouvelle instruction Select Case avec une expression de test de cordage:

Select Case expressionStr

Case " 1 "

Debug.Print
(« cas 1 " )

de cas " 2 "

Debug.Print
(« cas 2 »)

Case " 3 "

Debug.Print
( " Case 3 ")

End Select
4

Copier et coller le code suivant pour créer une nouvelle instruction Select Case avec une expression de test entier :

Select Case expressionInt

cas 1

Debug.Print ( " cas n ° 1 »)

cas 2

Debug.Print ( " Case 2")

cas 3

Debug.Print ( " Case 3")

End Select
5

copiez et collez le code suivant pour créer une nouvelle instruction Select Case qui permettra de tester une expression entière et vérifie sa valeur dans une déclaration de cas unique :

Select Case expressionInt

cas 1 , 2

Debug.Print ( " Case 1 ou 2")

cas 3

Debug.Print ( " Case 3")

End Select

6

terminer votre procédure en tapant "End Sub " à la fin et appuyez sur " Ctrl" et " G " pour afficher la fenêtre Exécution. Appuyez sur "F5" pour exécuter la procédure et voir les résultats.