22.08.2013 Views

Visual Basic 6 Kurs

Visual Basic 6 Kurs

Visual Basic 6 Kurs

SHOW MORE
SHOW LESS

Create successful ePaper yourself

Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.

Od tej pory w każdym naszym Formie lub module module możemy korzystać z wybranej<br />

funkcji. Można jeśli się chce deklarować wybrane elementy jako Public w formach, one<br />

także będą dostępne dla całego projektu, jednak nie jest to możliwe dla wszystkich<br />

elemenentów (np. w Formie nie da się zapisać funkcji BitBlt jako Public, co więc jeśli<br />

chcielibyśmy jej używać w innym formie ? Musielbyśmy ją deklarować jeszcze raz, takie<br />

rozwiązanie jest mało efektywne).<br />

Co jeszcze dają nam moduły(można ich dodać dowolną ilość) ? Przedewszyskim<br />

możliwość napisania bardziej przejrzystego kodu. Można więc stworzyć sobie 3 moduły,<br />

jeden nazwać 'Funkcje Graficzne', drugi 'Funkcje Matematyczne', trzeci 'Inne'. A<br />

następnie w każdym module wpisać odpowiednie funkcje. W ten sposób nie będą one<br />

zaśmiecały głównych Form naszego projektu, który będzie od tej pory bardzo czytelny<br />

dla innych i przedewszystkim dla nas samych.<br />

Tworzenie funkcji/procedur/zmiennych dla modułów jako Private ma sens tylko wtedy,<br />

gdy wybrane zmienne/funkcje/procedury nie wychodzą poza obręb modułu czyli są<br />

używane tylko przez moduł, przykład:<br />

Private Function Dodaj(A As Integer, B As Integer) As Integer<br />

Dodaj = A + B<br />

End Function<br />

Public Function Dodaj4(A As Integer, B As Integer, C As Integer, D As Integer) As<br />

Integer<br />

Dodaj4 = Dodaj(A, B) + Dodaj(C, D)<br />

End Function<br />

Funkcja Dodaj jest dostępna tylko dla wybranego modułu, natomiast Funkcja Dodaj4 jest<br />

publiczna czyli dostępna dla wszystkich form i modułów.<br />

25. Forma<br />

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

Co to za program który ma tylko jedno okienko ? Teraz nauczymy się dodawać okienka i<br />

między nimi zarządzać. Okienko dodajemy z opcji Project => Add Form. Teraz nasze<br />

nowe okienko ma nazwe Form2, możemy to oczywiście zmienić, ale na razie zostawimy<br />

Form2.<br />

Teraz procedury formów :<br />

Load Co - ładuje nam form do pamięciu<br />

Co.Show - pokazuje załadowane form<br />

Ustawmy na form1 przyciski i wpiszmy mu po kliknięciu :<br />

Private Sub Command1_Click()<br />

Load Form2<br />

Form2.Show<br />

End Sub<br />

Po uruchomieniu programu i kliknięciu przycisku pojawi się drugie okienko.<br />

Co.Hide - ukrywa forme<br />

33

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

Saved successfully!

Ooh no, something went wrong!