Przykładowa aplikacja

Tworzenie aplikacji

Proces tworzenia aplikacji za pomocą programu Visual Basic zostanie zilustrowany przykładem. Pierwszym krokiem jest zdefiniowanie zdarzeń i projektu graficznego aplikacji. W naszym przypadku będzie to zegarek cyfrowy. Będzie on wyświetlał datę a pod nią czas. Zarówno datę jak i czas będzie można ukryć, a także będzie można wybrać rodzaj i kolor wyświetlanych czcionek oraz sposób ich formatowania. Kliknięcie prawym przyciskiem myszy na dacie lub czasie będzie rozwijać odpowiednie menu pop-up

Tworzenie aplikacji zaczynamy od ustalenia właściwości formy:

Właściwość	Wartość	Opis
Name	frmZegar	nazwa formy
Caption	Zegar	tytuł formy
Height	1500	wysokość formy
Width	3000	wysokość formy

Pozostałe właściwości zostawiamy domyślne.

Do formy dodajemy teraz dwie kontrolki Label. Pierwsza będzie wyświetlała datę, druga czas. W oknie Properties ustalamy właściwości pierwszej:

Właściwość	Wartość	Opis
Name	lblData	nazwa kontrolki
AutoSize	True	automatyczna zmiana rozmiaru kontrolki
BackStyle	0 - Transparent	rodzaj tła kontrolki
Caption	00:00:00	tekst kontrolki (ten tekst i tak nie będzie wyświetlany, bo tu będzie wyświetlana data)
Font.Size	12	rozmiar czcionki (okno dialogowe Czcionka)
Left	1000	pozycja lewej krawędzi kontrolki
Top	100	pozycja górnej krawędzi kontrolki

I właściwości drugiej kontrolki Label wyświetlającej czas:

Właściwość	Wartość	Opis
Name	lblCzas	nazwa kontrolki
AutoSize	True	automatyczna zmiana rozmiaru kontrolki
BackStyle	0 - Transparent	rodzaj tła kontrolki
Caption	00:00:00	tekst kontrolki (ten tekst i tak nie będzie wyświetlany, bo tu będzie wyświetlany czas)
Font.Size	12	rozmiar czcionki (okno dialogowe Czcionka)
Left	1000	pozycja lewej krawędzi kontrolki
Top	400	pozycja górnej krawędzi kontrolki

Sekundowe zmiany wartości czasu wyświetlane w kontrolkach, realizuje kontrolka Timer. W oknie Properties ustalamy jej właściwości:

Właściwość	Wartość	Opis
Name	tmrZegar	nazwa kontrolki
Enabled	True	włączenie kontrolki
Interval	1000	czas w milisekundach, po którym generowane jest zdarzenie Timer (1000 odpowiada 1 sekundzie)
Left	100	położenie kontrolki (nie ma znaczenia, ponieważ kontrolka nie jest widoczna w czasie działania programu)
Top	400	położenie kontrolki (nie ma znaczenia, ponieważ kontrolka nie jest widoczna w czasie działania programu)

Aby umożliwić użytkownikowi zmianę czcionek i kolorów dołączamy do formy kontrolkę CommonDialog. Standartowo nie jest ona dołączana do okna Toolbox, należy więc otworzyć okno Components (wcisnąć CTRL+T lub wybrać polecenie Components... menu Project). W oknie tym należy zaznaczyć pozycję Microsoft Common Dialog Control 5.0. Należy zaznaczyć pole wyboru obok tej nazwy i wcisnąć przycisk OK. Kontrolka CommonDialog pojawi się w oknie Toolbox. Należy ją dołączyć do formy i ustawić właściwości w oknie Properties:

Właściwość	Wartość	Opis
Name	cdlOknaDialogowe	nazwa kontrolki
Left	100	położenie kontrolki (nie ma znaczenia, ponieważ kontrolka nie jest widoczna w czasie działania programu)
Top	0	położenie kontrolki (nie ma znaczenia, ponieważ kontrolka nie jest widoczna w czasie działania programu)

Do formy dodajemy teraz menu (ikona MenuEditor na pasku narzędziowym, CTRL+E, polecenie MenuEditor z menu Tools) i ustawiamy właściwości:

Pozycja i właściwości menu
Caption			Name	Index	Checked	Visible	Opis
&Zegar			mnuZegar			V
...	K&olor		mnuZegarKolor			V	umożliwia zmianę koloru tła
...	-		mnuZegarSeparator1			V	linia separująca menu
...	&Koniec		mnuZegarKoniec			V	kończy program
&Data			mnuData			V	opcje wyświetlania daty
...	&Pokaż		mnuDataPokaz		V	V	pokazuje i ukrywa datę
...	&Ustaw		mnuDataUstaw			V	ustawia nową datę
...	-		mnuDataSeparator1			V	linia separująca menu
...	&Czcionka		mnuDataCzcionka			V	umożliwia wybór czcionki i jej koloru
...	&Format		mnuDataFormat			V	umożliwia wybór formatu wyświetlanej daty
......		&Długa	mnuDataFormatFormaty	1	V	V	wyświetla datę w formacie długim
......		ś&rednia	mnuDataFormatFormaty	2		V	wyświetla datę w formacie średnim
......		&Krótka	mnuDataFormatFormaty	3		V	wyświetla datę w formacie krótkim
&Czas			mnuCzas			V	opcje wyświetlania czasu
...	&Pokaż		mnuCzasPokaz		V	V	pokazuje i ukrywa czas
...	&Ustaw		mnuCzasUstaw			V	ustawia nowy czas
...	-		mnuCzasSeparator1			V	linia separująca menu
...	&Czcionka		mnuCzasCzcionka			V	umożliwia wybór czcionki i jej koloru
...	&Format		mnuCzasFormat			V	umożliwia wybór formatu wyświetlanego czasu
......		&Długi	mnuCzasFormatFormaty	1	V	V	wyświetla czas w formacie długim
......		ś&redni	mnuCzasFormatFormaty	2		V	wyświetla czas w formacie średnim
......		&Krótki	mnuCzasFormatFormaty	3		V	wyświetla czas w formacie krótkim
&Menu			mnuCzas				pop-up menu formy
...	&Ukryj menu		mnuMenuUkryj			V	pokazuje i ukrywa menu
...	-		mnuMenuSeparator1			V	linia separująca menu
...	&Data		mnuMenuData		V	V	pokazuje i ukrywa datę
...	&Czas		mnuMenuCzas		V	V	pokazuje i ukrywa czas

Podmenu Format menu Data i Czas zawiera pozycje Długi, średni i Krótki. Aby formatować sposób wyświetlania daty i czasu, można użyć funkcji Format(). Funkcja ta daje możliwość formatowania daty i czasu w trzech predefiniowanych rodzajach, właśnie: długim, średnim i krótkim. Można więc łatwo wykorzystać możliwości tej funkcji i wprowadzić takie formatowanie daty i czasu do programu. Dlatego też, w menu pojawiły się odpowiednie pozycje. Pozycje Długa menu Data\Format i Długi menu Czas\Format mają ustawione właściwości Checked na True (znacznik V), ponieważ przy uruchomieniu programu data i czas będą wyświetlane w takich właśnie formatach. Polecenia te mają taką samą nazwę (właściwość Name) i różne indeksy, określające położenie tych poleceń wewnątrz tablicy kontrolek o nazwie mnuDataFormatFormaty i mnuCzasFormatFormaty. Użycie tablicy kontrolek i indeksowania skraca kod programu, ponieważ zamiast pisać osobną procedurę dla każdego polecenia, możemy napisać jedną a Indeks, który zostanie przekazany do tej procedury przez Visual Basic, będzie określał, które polecenie zostało wybrane.
Menu Menu jest niewidocznym menu, które zostanie wykorzystane jako menu pop-up formy frmZegar i będzie wyświetlane, gdy użytkownik klinkie prawym przyciskiem na formie.

Po dodaniu kontrolek i menu do formy wygląda ona tak:

dalej...

na górę strony...