IBM Lotus Symphony
|
Prikaže pogovorno okno s sporočilom in vrne vrednost.
MsgBox (Text As String [,Type As Integer [,Dialogtitle As String]])
Celo število
Text: Nizovni izraz, ki se prikaže kot sporočilo v pogovornem oknu. Prelomi vrstic se lahko vstavijo s Chr$(13).
DialogTitle: Nizovni izraz, ki se prikaže v naslovni vrstici pogovornega okna. Če se ta izpusti, se prikaže ime ustrezne aplikacije.
Type: Celoštevilski izraz, ki podaja vrsto pogovornega okna in definira število ter vrsto gumbov ali ikon, ki naj se prikažejo. Type prestavlja kombinacijo vzorcev bitov (kar pomeni, da se kombinacija elementov lahko definira s seštevanjem njihovih ustreznih vrednosti):
Vrednosti
0 : Prikaži samo gumb V redu.
1 : Prikaži gumba V redu in Prekliči.
2 : Prikaži gumbe Prekini, Ponovi in Prezri.
3 : Prikaži gumbe Da, Ne in Prekliči.
4 : Prikaži gumba Da in Ne.
5 : Prikaži gumba Ponovi in Prekliči.
16 : Pogovornemu oknu doda ikono Stop.
32 : Pogovornemu oknu doda ikono Vprašaj.
48 : Pogovornemu oknu doda ikono Klicaj.
64 : Pogovornemu oknu doda ikono Informacija.
128 : Prvi gumb pogovornega okna kot privzeti gumb.
256 : Drugi gumb pogovornega okna kot privzeti gumb.
512 : Tretji gumb pogovornega okna kot privzeti gumb.
Vrnjena vrednost:
1: V redu
2 : Prekliči
3 : Prekini
4 : Ponovi
5 : Prezri
6 : Da
7 : Ne
Sub ExampleMsgBox
Dim sVar as Integer
sVar = MsgBox("Las Vegas")
sVar = MsgBox("Las Vegas",1)
sVar = MsgBox( "Las Vegas",256 + 16 + 2,"Naslov pogovornega okna")
end sub