Обычный MsgBox:
MsgBox "Текст сообщения", тип сообщения 
,"Заголовок сообщения"
Например:
MsgBox "Ваш заказ будет готов " & Now() + 10, vbInformation, "Стол заказов"
Диалоговый MsgBox:
Переменная = MsgBox("Текст сообщения", тип сообщения 
, "Заголовок сообщения")
Переменную для диалогового MsgBox нужно заранее объявлять тогда, когда в модуле указан Option Explicit.
Например (без объявления переменной):
Dialog = MsgBox("Вы ввели не дату. Повторить попытку?", vbYesNo, "Стол заказов")
If Dialog = vbYes Then
' вернуться к вводу даты
End If
Пример:
Public Const softname = "Name"
If MsgBox("Запустить программу?", vbYesNo, softname) <> vbYes Then Exit Sub
См. также: InputBox