Les 10
$COMPILE EXE
'$include "win32api.inc"
%MBOk =0
%MBOkAfbreken =1
%MBOkAfbrekenOpnieuwNegeren =2
%MBJaNeeAfbreken =3
%MBJaNee =4
%MBNogmalsAfbreken =5
%MBKruis =16 'fout
%MBVraag =32 'vraag messagebox
%MBUitroep =48 'uitroepteken waarschuwing
%MBInfo =64 'info balloon
FUNCTION PBMAIN() AS LONG
LOCAL antwoord AS LONG
antwoord=MSGBOX ("Hallo Wereld",%MBJaNeeAfbreken OR
%MBInfo,"Dit is een MessageBox")
MSGBOX("Antwoord was: "+STR$(antwoord))
END FUNCTION