Funció MsgBox per pendre decisions

La funció MsgBox dins d'una estructura If End If serveix per treure un missatge a l'usuari de l'aplicació i donar-li la opció de decidir si vol efectuar un procediment o un altre. En el següent exemple, quan fem clic en un commandbutton, anomenat obririnforme, mostrem un missatge en pantalla i donem l'opció a l'usuari d'obrir l'informe si clica Sí o de no obrir-lo si clica No:

Option Compare Database
Option Explicit

Private Sub obririnforme_Click()
If MsgBox("Vols veure l'informe? ", vbYesNo, "ATENCIÓ") = vbYes Then
instrucció...
instrucció...
Else
End If
End Sub

Constant per fer un salt de línia en un MsgBox multilínia

Per exemple es pot utilitzar dins un MsgBox, quan el texte que volem mostrar en pantalla és massa llarg:

Option Compare Database
Option Explicit

instrucció...
instrucció...
MsgBox("Aquest text podem fer que s'acabi aquí " & vbCrLf & " i continuem a la línia de sota")