IBM Lotus Symphony


Funkcia MsgBox [Runtime]

Zobrazí dialógové okno obsahujúce správu a vráti hodnotu.

Syntax:

MsgBox (Text As String [,Type As Integer [,Dialogtitle As String]])

Návratová hodnota:

Typ Integer

Parameter:

Text: Reťazcový výraz zobrazený ako správa v dialógovom okne. Ukončenia riadka môžu byť vložené pomocou Chr$(13).

DialogTitle: Reťazcový výraz zobrazený v lište s nadpismi tohto dialógového okna. Ak je vynechaný, zobrazí sa názov príslušnej aplikácie.

Type: Každý celočíselný výraz, ktorý špecifikuje typ dialógového okna a definuje číslo a typ zobrazených tlačidiel alebo ikon. Type predstavuje kombináciu bitových vzorov (prvky dialógového okna zadefinované pridaním príslušných hodnôt):

Hodnoty

0 : Zobraziť len tlačidlo OK.

1 : Zobraziť tlačidlá OK a Zrušiť.

2 : Zobraziť tlačidlá Prerušiť, Zopakovať a Ignorovať.

3 : Zobraziť tlačidlá Áno, Nie a Zrušiť.

4 : Zobraziť tlačidlá Áno a Nie.

5 : Zobraziť tlačidlá Zopakovať a Zrušiť.

16 : Do dialógového okna pridať ikonu Zastaviť.

32 : Do dialógového okna pridať ikonu otáznika.

48 : Do dialógového okna pridať ikonu výkričníka.

64 : Do dialógového okna pridať Ikonu Informácie.

128 : Nastaviť prvé tlačidlo v dialógovom okne ako predvolené tlačidlo.

256 : Nastaviť druhé tlačidlo v dialógovom okne ako predvolené tlačidlo.

512 : Nastaviť tretie tlačidlo v dialógovom okne ako predvolené tlačidlo.

Návratová hodnota:

1 : OK

2 : Zrušiť

3 : Prerušiť

4 : Zopakovať

5 : Ignorovať

6 : Áno

7 : Nie

Chybové kódy

5 Neplatné volanie procedúry

Príklad:

Sub ExampleMsgBox

Dim sVar as Integer

sVar = MsgBox("Las Vegas")

sVar = MsgBox("Las Vegas",1)

sVar = MsgBox( "Las Vegas",256 + 16 + 2,"Názov dialógového okna")

end sub


Spätná väzba na produkt | Ďalšia dokumentácia | Ochranné známky