German API Programming

Declare Function MessageBox Lib "user32" Alias "MessageBoxA" _
(ByVal hWnd As Integer, ByVal lpText As String, _
ByVal lpCaption As String, ByVal wType As Integer) As IntegerConst
fbOkOnly = 0 'Nur die Schaltfläche OK anzeigenConst
fbOkCancel = 1 'Schaltflächen OK und Abbrechen anzeigenConst
fbAbortRetryIgnore = 2 'Abbruch, Wiederholen und IgnorierenConst
fbYesNoCancel = 3 'Ja, Nein und AbbrechenConst
fbYesNo = 4 'Schaltflächen Ja und NeinConst
fbRetryCancel = 5 'Schaltflächen Wiederholen und AbbrechenConst
fbCritical = 16 'Stop-SymbolConst
fbQuestion = 32 'Fragezeichen-SymbolConst
fbExclamation = 48 'Ausrufezeichen-SymbolConst
fbInformation = 64 'Information-SymbolDim s As Integers = MessageBox (me.hWnd, "Dies ist ein Lustiger Text!", "Ich bin der Title",fbInformation)s = MessageBox (me.hWnd, "Sollen wir Fortfahren?","Frage",fbYesNo)

If s = 6 Then Print "Ja wurde geklickt!"

If s = 7 Then Print "Nein wurde geklickt!"SleepEnd

(ich verstehe nicht)