Witam wszystkich już w czwartej części Visual Basic Kursu. Poznaliśmy już interface VB i teraz czas na poznanie kilku zasad i podstaw programowania, co postaram się wam opisać w tym i w kolejnych częściach VB Kursu.

  Zacznijmy znów od podstaw. Aby wywołać funkcję i ją zmienić w programie należy w oknie wpisywania kodu odpowiedniej właściwości przypożądkować działanie użytkownika. Np.: Utwożyć kontrolkę CommandButton kliknąć nań dwa razy i w oknie kodu które otrzymamy należy wpisać:

Private Sub Command1_Click()
Command1.Caption = "Zmieniłem wartość Caption"
End Sub

Gdy ktoś kliknie raz na przycisk jego nazwa zostanie zmieniona na nazwę zawartą między cudzysłowiem.

  Przydałoby się poznać podstawowe zdarzenia do których możemy dodać kod, aby gdy zdarzenie się rozpocznie program wykonał zadanie. A oto one:

Load - Co się stanie gdy dane okno zostanie załadowane.

LostFocus - Występuje, gdy obiekt traci fokus na skutek działania użytkownika, takiego jak naciśnięcie klawisza tabulatora lub kliknięcie innego obiektu, albo na skutek zmiany fokusu w kodzie za pomocą metody SetFocus.

MouseDown - Występuje, gdy przycisk myszy znajduje się w pozycji wciśniętej.

MouseMove - Występuje, gdy poruszymy myszą.

MouseUp - Wstępuje, gdy przycisk myszy z pozycji wciśniętej wraca do góry.

OLECompleteDrag - Występuje, gdy składnik źródłowy zostaje upuszczony na składnik docelowy, informując składnik źródłowy, że akcja przeciągania została przeprowadzona albo anulowana.

OLEDragDrop - Występuje, gdy składnik źródłowy jest upuszczany na składnik docelowy i składnik źródłowy określa, że operacja upuszczenia może zostać przeprowadzona.

OLEDragOver - Występuje, gdy jeden składnik jest przeciągany nad innym.

OLEGiveFeedback - Występuje po każdym zdarzeniu OLEDragOver. Zdarzenie OLEGiveFeedback umożliwia składnikowi źródłowemu wyświetlenie wizualnej informacji dla użytkownika, takiej jak zmiana kursora myszy, aby określić, co się stanie, gdy użytkownik upuści obiekt lub wizualnie oznaczyć wybrane dane (w składniku źródłowym), aby określić, co się stanie.

OLESetData - Występuje w składniku źródłowym, gdy składnik docelowy wykonuje metodę GetData na obiekcie DataObject źródła, ale dane dla określonego formatu nie zostały jeszcze załadowane.

OLEStartDrag - Występuje, gdy wykonywana jest metoda OLEDrag składnika lub gdy składnik inicjuje operację przeciągania/upuszczania OLE, jeśli właściwość OLEDragMode jest ustawiona na wartość Automatic. Zdarzenie to określa formaty danych i efekty upuszczania obsługiwane przez składnik źródłowy. Może ono być również używane do wstawiania danych do obiektu DataObject.

Paint - Występuje, gdy cały obiekt (lub jego część) zostaje odsłonięty, po jego przesunięciu lub powiększeniu lub po przesunięciu okna zasłaniającego ten obiekt.

QueryUnload - Występuje przed zamknięciem formularza lub aplikacji. Gdy zamykany jest obiekt MDIForm, zdarzenie QueryUnload występuje najpierw dlaformularza MDI, a następnie dla wszystkichformularzy podrzędnych MDI. Jeśli zdarzenie QueryUnload nie zostanie anulowane przez żaden formularz, zdarzenie Unload występuje najpierw dla wszystkich innych formularzy, a następnie dla formularza MDI. Gdy zamykany jest formularz podrzędny lub obiekt Form, zdarzenie QueryUnload dla tego formularza występuje przed jego zdarzeniem Unload.

Resize - Występuje, gdy rozmiar okna zostaje zmieniony.

Terminate - Występuje, gdy wszystkie odwołania do wystąpienia obiektu Form, MDIForm, formant User, Property Page, Webclass, DHTML Page Designer lub klasy zostaną usunięte z pamięci przez ustawienie na wartość Nothing wszystkich zmiennych odwołujących się do obiektu lub gdy ostatnie odwołanie do obiektu znajdzie się pozazakresem.

Unload - Występuje, gdy formularz ma być usunięty z ekranu. Gdy formularz jest ponownie ładowany, zawartość wszystkich jego formantów jest ponownie inicjalizowana. Zdarzenie to jest wyzwalane przez użytkownika zamykającego formularz za pomocą polecenia "Zamknij" z menu sterowania lub za pomocą instrukcji Unload.

  To by było na tyle co do podstawowych zdarzeń, a teraz coś o tym jak napisać już samemu!!! Pierwszy program!

  A chodzi tu dokładnie o to co chcemy zdefiniować(nadać właściwość) danej formie. A definiujemy po kropce używając określonych operatorów teraz tylko poznamy operator = (równa się), ponieważ operatorom, arytmetycznym będzie poświęcona następna część kursu. A wygląda to tak:

Sub Zdarzenie()
Label1.Caption="O zmieniło się!!!"
End Sub

  Ten przykład pokazuje, że przy określonym zdarzeniu np. Click kontrolki CommandButton zmienia wartość Caption kontrolki LabelBox na: O zmieniło się!!! Tak można definiować i prosto zmieniać określone wartości. Np. Po kliknięciu na przycisk pojawia się obrazek, który był niewidoczy, czyli: Właściwość Visible obrazka była ustawiona na False, a po kliknięciu na przycisk zmieniła się na True. Do zdarzenia kliknięcia na przycisk należy dodać następujący kod (biorąc pod uwagę, że właściwość obrazka Name=Image1, a Visible=False):

Image1.Visible=True

  I tyle! Żadna filozofia, a jest to całkiem łatwe i przyjemne!!! Spróbój pozmieniać różne wartości danych kontrolek przy różnych zdarzeniach, a zobaczysz, że nie jest to wcale takie trudne, ba! A nawet proste!

Jak zwykle zachęcam do przysyłania swoich dzieł! Nazwiska autorów najciekwszych programów będą wyróżnione!!

  Jeśli masz jakiś problem zawsze możesz napisać do mnie!

 

Autor :
Filip Cynarski
filip@webhelp.pl
http://vbgo.prv.pl