Prikazi cijelu temu 06.08.2013 10:32
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Lokacija:Tuzla


Predmet:Re: Skola Vb-a za napredne
Eh sad smo ovdje nakucali bezbroj nepoznatih stvari pa idemo redom.
Function ImeProcedure(Argument1, argument2)
Function-Govori nam da je to funkcijska procedura odnosno funkcija.
Moglo je biti ispred function napisano Public ili Private Ili pak Static.
Private (Privatno)- (neobavezno) označava da je procedura dostupna samo procedurama u istom modulu.
Public (Javna)- (neobavezno) označava da je procedura dostupna svakoj drugoj u bilo kojem modulu svih aktivnih Workbook i nju se može pozvati.
Static (Statična)- (neobavezno) pokazuje da su u proceduri varijable sačuvane kada postupak završi.
Ukoliko se ne navede niti jedan od ova tri argumenta onda je procedura Public.

ImeProcedure-O njemu smo vec pisali to je samo ime procedure i ukoliko se radi o funkciji onda mozemo vratiti neku vrijednost a i nemoramo.
Znaci ukoliko se radi o funkciji i samo ime procedure je jedna variabla kojoj mozemo dodijeliti vrijednost.
E posto se radi o variabli onda joj isto mozemo odrediti i tip.
Tip imena procedure pise se na kraju iza zatvorene zagrade koja oivicava ulazne parametre.
Primjer:
Function ImeProcedure((Argument1, argument2, argument3) as String
U predhodnom primjeru smo dimenzionisali variablu imena procedure kao string.

Pozeljno je uvijek dimenzionisati sve variable iako je to neobavezno u VB-u.
Ukoliko to ne radimo program ce nam raditi sigurno sporije.

Argument1,Argument2...
Argument1,argument2... su ulazni parametri pri pokretanju procedure.
Od njih zavisi sam tok procedure.
Pozeljno je da i ulazni parametri budu dimenzionisani.
Ukoliko ispred ulaznog parametra dodamo rijec optional onda taj parametar nije obavezan pri pozivu procedure.
Primjer:
Function UlazniParametri(Par1 As Integer, Optional Par2 As Integer = 7) As Integer
UlazniParametri = Par1 + Par2
End Function


Ovu proceduru mozemo pozvati ovako:
Sub PozivP()
Dim a
a = UlazniParametri(2, 10)
End Sub

Ili Ovako:
Sub PozivP()
Dim a
a = UlazniParametri(2)
End Sub

Kako vidite ukoliko je ulazni parametar neobavezan opnda mu mozemo dodijeliti vrijednost u samom nazivu.
U nekim drugim programskim jezicima to je moguce svim variablama.
Podrška samo putem foruma, jer samo tako i ostali imaju koristi od toga.