Funkcja MsgBox
Funkcja MsgBox wyświetla okno dialogowe z komunikatem i czeka na wciśnięcie przycisku przez użytkownika, po czym zwraca wartość typu Integer określającą przyciśnięty prz użytkownika przycisk.
Składnia funkcji MsgBox:
MsgBox(Komunikat [, Przyciski] [, Tytuł] [, PlikHelp, HelpContext])
Argumenty funkcji MsgBox:
| Argument |
Opis |
| Komunikat |
(Wymagany) Wyrażenie łańcuchowe wyświetlane jako wiadomość w oknie dialogowym. Maksymalna długość łańcucha może wynosić 1024 znaki, w zależności od szerokości używanych znaków. Jeżeli łańcuch ten zawiera więcej niż jedną linię, można oddzielać je używając znaków powrotu karetki (carriage return Chr(13)) i podziału linii (linefeed Chr(10)), lub połączenia (Chr(10) & Chr(13)), pomiędzy poszczególnymi liniami. |
| Przyciski |
(Opcjonalny) Wyrażenie numeryczne , które jest sumą wartości (lub stałych VB) określających numer i typ przycisków, które mają być wyświetlane, styl wyświetlanej ikony i modalność okna wiadomości. Jeżeli zostanie ominięty przyjmowana jest domyślna wartość 0. |
| Tytuł |
(Opcjonalny) Wyrażenie łańcuchowe wyświetlane na pasku tytułowym okna dialogowego. Jeżeli zostanie pominięty, na pasku tytułowym zostanie wyświetlona nazwa aplikacji. |
| PlikHelp |
(Opcjonalny) Wyrażenie łańcuchowe określające plik pomocy (Help), który ma być użyty do przeszukiwania pomocy kontekstowej dla okna dialogowego. Jeżeli zostanie wprowadzona nazwa pliku pomocy, musi zostać wprowadzony argument HelpContext. |
| HelpContext |
(Opcjonalny). Wyrażenie numeryczne określające numer kontekstowy skojarzony z tematem pomocy przez autora pomocy. Jeżeli argument ten zostanie określony, musi zostać określony argument PlikPomocy. |
Wartości i stałe VB dostępne dla argumentu Przyciski:
| Przyciski |
| Stała |
Wartość |
Opis |
| vbOKOnly |
0 |
Przycisk OK |
| vbOKCancel |
1 |
Przyciski OK i Cancel(Anuluj) |
| vbAbortRetryIgnore |
2 |
Przyciski Abort(Przerwij), Retry(Ponów próbę) i Ignore(Zignoruj) |
| vbYesNoCancel |
3 |
Przyciski Yes(Tak), No(Nie) i Cancel(Anuluj) |
| vbYesNo |
4 |
Przyciski Yes(Tak) i No(Nie) |
| vbRetryCancel |
5 |
Przyciski Retry(Ponów próbę) i Cancel(Anuluj) |
| vbCritical |
16 |
Wyświetla ikonę wiadomości krytycznej |
| vbQuestion |
32 |
Wyświetla ikonę pytania |
| vbExclamation |
48 |
Wyświetla ikonę wiadomości ostrzegawczej (wykrzyknik) |
| vbInformation |
64 |
Wyświetla ikonę wiadomości |
| vbDefaultButton1 |
0 |
Pierwszy przycisk jest domyślny |
| vbDefaultButton2 |
256 |
Drugi przycisk jest domyślny |
| vbDefaultButton3 |
512 |
Trzeci przycisk jest domyślny |
| vbDefaultButton4 |
768 |
Czwarty przycisk jest domyślny |
| vbApplicationModal |
0 |
Okno modalne dla aplikacji, użytkownik musi zareagować na wiadomość |
| vbSystemModal |
4096 |
Okno modalne dla systemu, wszystkie aplikacje są zawieszone dopóki użytkownik nie zareaguje na wiadomość |
| vbMsgBoxHelpButton |
16384 |
Dodaje przycisk Help(Pomoc) |
| VbMsgBoxSetForeground |
65536 |
Okno wiadomości będzie oknem na wierzchu |
| vbMsgBoxRight |
524288 |
Tekst jest wyrównany do prawej |
| vbMsgBoxRtlReading |
1048576 |
Tekst powinien być czytany od prawej do lewej w systemach Arabskich i Hebrajskich |
Pierwsza grupa przycisków (0-5) określa numer i typ przycisków wyświetlanych w oknie dialogowym.
Druga grupa (16, 32, 48, 64) określa styl wyświetlanej ikony.
Trzecia grupa (0, 256, 512) określa, który przycisk jest domyślny.
Czwarta grupa (0,4096) określa modalność okna.
Aby określić wartość wyświetlanych przycisków należy dodawać tylko jedną wartość z każdej z tych grup.
Stałe te są określone przez Visual Basic for Applications.
Wartości i stałe VBzwracane przez funkcję MsgBox:
| Stała |
Wartość |
Opis |
| vbOK |
1 |
OK |
| vbCancel |
2 |
Cancel(Anuluj) |
| vbAbort |
3 |
Abort(Przerwij) |
| vbRetry |
4 |
Retry(Ponów próbę) |
| vbIgnore |
5 |
Ignore(Zignoruj) |
| vbYes |
6 |
Yes(Tak) |
| vbNo |
7 |
No(Nie) |
Jeżeli zostaną podane argumenty PlikHelp i HelpContext, użytkownik może wcisnąć F1 aby uzyskać temat pomocy odpowiedni dla kontekstu. Niektóre aplikacje typu host, np. Microsoft Excel, automatycznie dodają przycisk Help do okna dialogowego.
Jeżeli okno dialogowe jest wyświetlane z przyciskiem Cancel(Anuluj), to wciśnięcie klawisza ESC, ma takie samo znaczenie jak wciśnięcie przycisku Cancel(Anuluj).
Jeżeli okno dialogowe zawiera przycisk Help(Pomoc), pomoc kontekstowa jest skojarzona z oknem dialogowym. Jednak żadna wartość nie zostanie zwrócona, dopóki nie zostanie wciśnięty jakiś inny przycisk.
Aby określić więcej niż pierwszy argument, należy użyć funkcji MsgBox w wyrażeniu. Aby ominąć niektóre parametry, należy wprowadzić odpowiednie przecinki rozdzielające.
Przykład użycia funkcji MsgBox:
Dim varWcisniety As Variant
varWcisniety=MsgBox("Czy chcesz kontynuowac?", vbYesNo+vbCritical+vbDefaultButton2, "Pytanie", "DEMO.HLP", 10)
'wyświetla okno z wiadomością i tytułem, przyciskami Yes i No, domyślnym przyciskiem drugim i skojarzony z tematem pomocy w pliku pomocy
'zmienna varWcisniety zawiera wartość wciśniętego przycisku vbYes lub vbNo
(Zmienne i typy zmiennych zostały opisane w innych częściach kursu.)
na górę strony...
|
