IBM Lotus Symphony
|
Työ näkyviin valintaikkunan, jossa on sanoma, ja palauttaa arvon.
MsgBox (Text As String [,Type As Integer [,Dialogtitle As String]])
Kokonaisluku
Text: Merkkijonolauseke näkyy sanomana valintaikkunassa. Rivinvaihtoja voi lisätä Chr$(13):n avulla.
DialogTitle: Merkkijonolauseke näkyy valintaikkunan otsikkorivillä. Jos se jätetään pois, näkyvissä on vastaavan sovelluksen nimi.
Type: Mikä tahansa kokonaislukulauseke, joka määrittää valintaikkunan lajin ja määrittää näytettävien painikkeiden ja kuvakkeiden määrän ja lajin. Type ilmaisee bittikuvioiden yhdistelmän (valintaikkunan elementit, jotka on määritetty lisäämällä niiden arvot):
Arvot
0 : Näytä vain OK-painike.
1 : Näytä OK- ja Peruuta-painike.
2 : Näytä Keskeytä-, Yritä uudelleen- ja Ohita-painikkeet.
3 : Näytä Kyllä-, Ei- ja Peruuta-painike.
4 : Näytä Kyllä- ja Ei-painikkeet.
5 : Näytä Yritä uudelleen- ja Peruuta-painikkeet.
16 : Lisää Seis-kuvake valintaikkunaan.
32 : Lisää Kysymys-kuvake valintaikkunaan.
48 : Lisää Huutomerkki-kuvake valintaikkunaan.
64 : Lisää Tieto-kuvake valintaikkunaan.
128 : Valintaikkunan ensimmäinen painike on oletuspainike.
256 : Valintaikkunan toinen painike on oletuspainike.
512 : Valintaikkunan kolmas painike on oletuspainike.
Palautusarvo:
1 : OK
2 : Peruuta
3 : Keskeytä
4 : Yritä uudelleen
5 : Ohita
6 : Kyllä
7 : Ei
Sub ExampleMsgBox
Dim sVar as Integer
sVar = MsgBox("Las Vegas")
sVar = MsgBox("Las Vegas",1)
sVar = MsgBox( "Las Vegas",256 + 16 + 2,"Dialog title")
end sub