Nel modulo:
Public Declare Function MessageBox& Lib "user32" Alias "MessageBoxA" (ByVal hWnd&, ByVal lpText$, ByVal lpCaption$, ByVal wType&)

Nel form:
MessageBox hWnd, "mio messaggio", "titolo", bottoni


Ciao