IBM Lotus Symphony
|
Viser en dialogboks, der indeholder en meddelelse.
MsgBox Tekst As String [,Type As Integer [,Dialogtitel As String]] (As Statement) eller MsgBox (Tekst As String [,Type As Integer [,Dialogtitel As String]]) (As Function)
Tekst: Det udtryk med typen String, der skal vises som en meddelelse i dialogboksen. Du kan indsætte linjeskift med Chr$(13).
Dialogtitel: Det udtryk med typen String, der skal vises på dialogboksens titellinje. Hvis parameteren udelades, vises navnet på det pågældende program på titellinjen.
Type: Et udtryk med typen Integer, der angiver dialogboksens type, det antal og den type knapper, der skal vises, samt ikontypen. Type repræsenterer en kombination af bitmønstre. Det vil sige, at du kan definere en kombination af elementer ved at lægge elementernes værdi sammen:
0 : Vis kun knappen OK.
1 : Vis knapperne OK og Annullér.
2 : Vis knapperne Afbryd, Prøv igen og Ignorér
3 : Vis knapperne Ja, Nej og Annullér.
4 : Vis knapperne Ja og Nej.
5 : Vis knapperne Prøv igen og Annullér.
16 : Tilføj stopikonen til dialogboksen.
32 : Tilføj spørgsmålstegnikonen til dialogboksen.
48 : Tilføj udråbstegnikonen til dialogboksen.
64 : Tilføj oplysningsikonen til dialogboksen.
128 : Første knap i dialogboksen skal være standardknap.
256 : Anden knap i dialogboksen skal være standardknap.
512 : Tredje knap i dialogboksen skal være standardknap.
Sub EksempelMsgBox
Const sText1 = "Der er opstået en uventet fejl".
Const sTekst2 = "Udførelsen af programmet fortsætter imidlertid."
Const sTekst3 = "Fejl"
MsgBox(sTekst1 + Chr(13) + sTekst2,16,sTekst3)
End Sub