22.08.2013 Views

Visual Basic 6 Kurs

Visual Basic 6 Kurs

Visual Basic 6 Kurs

SHOW MORE
SHOW LESS

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

Scale<br />

ScaleHeight Liczba jednostek wysokości okna (jednostkę ustawia ScaleMode)<br />

ScaleLeft Liczba jednostek odległości od lewej krawędzi okna<br />

ScaleMode Ustala aktualną jednostkę<br />

ScaleTop Liczba jednostek od góry ekranu<br />

ScaleWidth Szerokość okna wyrażana jednostkami ustalonymi za pomocą ScaleMode<br />

6. Msgbox<br />

http://visual.basic.kaem.forall.pl/<br />

Msgbox jest funkcją wyświetlającą komunikat, jej zastosowanie wygląda tak<br />

a = Msgbox("Komunikat",przyciski+ikona,"Tytuł")<br />

Wyświetli to nam okienko o nazwie Tytuł i o treści Komunikat<br />

Spośród przycisków i ikon możemy wybrać :<br />

VbCritical - ikona krytyczna<br />

VbQuestion - znak zapytania<br />

VbExclamation - żółty ostrzegawczy trójkąt<br />

VbInformation - ikona informacji<br />

VbSystemModal - mała ikona systemowa<br />

VbOKonly - tylko przycisk ok<br />

VbOKCancel - przyciski ok. i anuluj<br />

VbAbortRetryIgnore - przyciski przerwij, ponów i ignoruj<br />

VbYesNoCancel - przyciski tak nie anuluj<br />

VbYesNo = przyciski tak nie<br />

VbRetryCancel przyciski ponów, anuluj<br />

Wymagany jest tylko 1 parametr, czyli treść komunikatu, pozostałych parametrów nie<br />

musimy podawać.<br />

a = Msgbox("Witaj")<br />

Jeżeli nie chcemy później sprawdzić jaką opcje z komunikatu wybrał użytkownik lub nie<br />

musimy tego robić nie trzeba podawać zmiennej która przechowa wynik, można to zrobić<br />

w ten sposób:<br />

Msgbox "Witaj"<br />

Przykładowy komunikat wyglądał by tak :<br />

a = Msgbox("Witaj użytkowniku",VbOKonly,"Powitanie")<br />

Można też łączyć przyciski i ikony znakiem +<br />

a = Msgbox("Podoba ci się program",VbYesNo + VbInformation,"Pytanie")<br />

Zmienna a przechowuje nam kliknięty przycisk, oto ich numery :<br />

1 - ok<br />

11

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!