Ukaz MsgBox

Prikaže pogovorno okno s sporočilom.

Skladnja:


   MsgBox prompt As String [,buttons = MB_OK [,title As String]]
   response = MsgBox( prompt As String [,buttons = MB_OK [,title As String]])

Parametri:

Poziv: niz, ki se bo prikazal v pogovornem oknu kot sporočilo. Prelome v novo vrstico vnesete s Chr$(13).

Naslov: niz, prikazan v naslovni vrstici pogovornega okna. Če parameter izpustite, se bo v naslovni vrstici izpisalo ime aplikacije.

Gumbi: Izraz vrste Integer, ki definira vrsto pogovornega okna, in pa število in vrsto gumbov, ki bodo prikazani, ter vrsto ikon. Gumbi je kombinacija bitnih vzorcev, to je kombinacija elementov, ki so definirani tako, da njihove vrednosti lahko seštevamo:

Poimenovana konstanta

Celoštevilska vrednost

Definicija

MB_OK

0

Pokaži samo gumb V redu.

MB_OKCANCEL

1

Pokaži gumba V redu in Prekliči.

MB_ABORTRETRYIGNORE

2

Pokaži gumbe Prekini, Poskusi znova in Prezri.

MB_YESNOCANCEL

3

Pokaži gumbe Da, Ne in Prekliči.

MB_YESNO

4

Pokaži gumba Da in Ne.

MB_RETRYCANCEL

5

Pokaži gumba Poskusi znova in Prekliči.

MB_ICONSTOP

16

Pogovornemu oknu dodaj ikono Stop.

MB_ICONQUESTION

32

Pogovornemu oknu dodaj ikono Vprašaj.

MB_ICONEXCLAMATION

48

Pogovornemu oknu dodaj ikono Klicaj.

MB_ICONINFORMATION

64

Pogovornemu oknu dodaj ikono Informacija.

128

Privzeti gumb v pogovornem oknu je prvi gumb.

MB_DEFBUTTON2

256

Privzeti gumb v pogovornem oknu je drugi gumb.

MB_DEFBUTTON3

512

Privzeti gumb v pogovornem oknu je tretji gumb.


Kode napak:

5 Neveljaven klic procedure

Primer:


Sub ExampleMsgBox
 Const sBesedilo1 = "Prišlo je do nepredvidene napake."
 Const sBesedilo2 = "Izvajanje programa se vseeno nadaljuje."
 Const sBesedilo3 = "Napaka"
 MsgBox(sText1 + Chr(13) + sText2,16,sText3)
 MsgBox(sText1 + Chr(13) + sText2, MB_ICONSTOP, sText3)
End Sub

Podprite nas!