Visual Basic 6 Kurs

Wartosc = Wartosc * Start
Loop
Silnia = Wartosc
End Function
Tak więc wywołanie funkcji Wartosc = Silnia(8) zwróci nam wartość 40320 (bo
1*2*3*4*5*6*7*8 = 40320, każde mnożenie oprócz pierwszego dokonuje się za każdym
razem gdy pętla się powtarza)).
Na stronie kursu:
http://visual.basic.kaem.forall.pl/
Można znaleść przykłady do tej lekcji (1)
21. Procedury
http://visual.basic.kaem.forall.pl/
Procedura jest to obszar kodu programu odpowiedzialny za wykonanie określonych
zadań. Standardowo w VB procedury wyglądają tak :
Private Sub Command1_Click()
End Sub
Commadn1_Click to nazwa procedury, potem jest miejsce na jej polecenia i End Sub jako
jej zakończenie. Procedury mogą mieć też swoje zmienne :
Private Sub Command1_Click(Index As Integer)
End Sub
Istnieje także możliwość tworzenia własnych procedur z własnymi parametrami :
Private Sub Komunikat(Tekst As String)
MsgBox Tekst
End Sub
Teraz naszą procedure wywołujemy tak :
Komunikat "Testowy komunikat"
Nasze procedury mogą być publiczne (dla całego projektu programu) i prywatne (tylko
dla tego form co je deklarujemy)
Private Sub Komunikat(Tekst As String)
MsgBox Tekst
End Sub
Prywatna procedura tylko dla naszego form
Public Sub Komunikat(Tekst As String)
MsgBox Tekst
End Sub
29