IBM Lotus Symphony
|
Viser en dialogboks, der indeholder en meddelelse, og returnerer en værdi.
MsgBox (Tekst As String [,Type As Integer [,Dialogtitel As String]])
Heltal
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.
Type: Et udtryk med typen Integer, der angiver dialogboksens type og definerer det antal og den type knapper og ikoner, der skal vises. Type repræsenterer en kombination af bitmønstre (elementer i dialogbokse defineres, ved at de respektive værdier lægges sammen):
Værdier
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.
Returværdi:
1 : OK
2 : Annullér
3 : Afbryd
4 : Prøv igen
5 : Ignorér
6 : Ja
7 : Nej
Sub EksempelMsgBox
Dim sVar as Integer
sVar = MsgBox("Las Vegas")
sVar = MsgBox("Las Vegas",1)
sVar = MsgBox( "Las Vegas",256 + 16 + 2,"Dialogtitel")
End Sub