Пример:
Private Sub Form_Open(Cancel As Integer)
MsgBox "vbExclamation", vbExclamation
MsgBox "vbInformation", vbInformation
MsgBox "vbQuestion", vbQuestion
MsgBox "vbCritical", vbCritical
End Sub
Пробовал на другом компьютере. Ctrl + Break там хорошо работал. На моей машине это было как если бы я нажал ОК вместо Ctrl + Break