Centar za edukaciju-BiH

Predmet:Re: Pitanja u vezi procedura i pisanja koda

---

Prije svega, hvala Vam na odgovoru.

SQL upit je tačan. Kada u prozoru Immediate prozovem funkciju ?SaldoPozitivno("neki broj") prikaže mi dobar rezultat. Međutim kada hoću da sa neke forme pozovem ovu funkciju na neki događaj, to nikako ne mogu da savladam.

Pročitao sam i onaj dio vezan za ADO konekciju ali opet ne shvatam pozivanje funkcije kad je promjenjiva deklarisana kao string (ne mogu da primijenim ni ovo Å¡to ste odgovorili pmiroslav-u Takodje se moze pozvati na neki event forme ili polja napr na on load.
=NadjiVrijednost("kupci";"Kupac";"Kupac2")
Kako ste primijetili delimiter izmedju variabli u ostalim slucajevime nije zarez ','nego tackazarez ';'..)

Kada u tabeli imam promjenjivu koja je tipa Integer i u ovoj funkciji umjesto "String" napiÅ¡em "Integer", pozovem funkciju na način kao Å¡to ste u VB Å¡koli opisivali i sve radi odlično.

Da li se ADO mora koristiti ako je sve smješteno u istoj bazi podataka?

Izvinjavam se Å¡to Vam oduzimam vrijeme.

Predmet:Re: Pitanja u vezi procedura i pisanja koda

---

Nemoras koristiti ado.
Mozes ukljuciti dao umjesto ado u referencama.
I ja to uvijek radim. Nevolim ado konekciju.
Kao se to radi.
Ako nisi koristio ado onda ga iskljucis u referencama:
Otvoris neki modul i samim tim Vb editor.
U meniju:
Tool--->References
Kada se otvori prozor odcekiras
Microsoft activX data Objects
A ukljucis
Microsoft DAO 3.51 ili neku drugu verziju dao.

Primjer sa forme:
Da pretpostavim da na formi Imas polje 'pArt' ili neko drugo iz kog hoces procitati ulazni parametar pri pozivu procedure.
Pored ovog polja moras imati i polje da napises rezultat procedure SaldoPozitivno.
Eto to polje cemo zvati RezultatSalda
Sada jos trebas imati jedan komandni taster sa koga ces pozvati ovu proceduru na event on klik.
Sad mbi islo:
Dim PArt as string
Dim Rezultat

PArt=Me.Part
Znaci iz polja Part ucitavamo vrijednost u Memorijsku koja se zove Part .
Rezultat=SaldoPozitivno(PArt)
Sada Pozivamo nasu proceduru SaldoPozitivno sa ulaznim parametrom iz memorijske PArt odnosno podatak iz polja PArt.

Procedura nam vraca vrijednost u memorijsku koja se zove Rezultat.
Me.RezultatSalda=Rezultat
Sada upisujemo iz memorijske rezultat u Polje RezultatSalda vrijednost koju nam je vratila procedura.
Drugi nacin.
Mozes ti staviti ovu proceduru Direktno na polje ali onda nemozes vrsiti izmjenu podataka u tom polju
uU nasem slucaju je to polje RezultatSalda
Tada bi pisali u controlSource ovog polja:
=SaldoPozitivno([PArt])-- ako je polju ime Part

Da ako pisemo u VB editoru onda je delimiter zares ali ako se radi o Query-u tabelama i formama onda se pise TackaZarez.

---

Predmet:Re: Pitanja u vezi procedura i pisanja koda

---

Tema je odlična. Pratim je. Hvala Vam na ovome.

LP

---

Predmet:Re: Pitanja u vezi procedura i pisanja koda

---

Opet ne razumijem.

Vi mi objaÅ¡njavate složene stvari, a ja se joÅ¡ mučim sa osnovama. Stavio sam najobičniju funkciju, da bude razumljivije. U polju "spoji" na događaj "On Got Focus" treba da pozovem funkciju ali ne ide...

Kao Å¡to sam ranije rekao, kad promjenjive deklariÅ¡em kao Integer mogu se snaći ali kad je u pitanju String, ne ide...

Prilozi:

Predmet:Re: Pitanja u vezi procedura i pisanja koda

---

Greška ti je kod spajanja stringa što si stavio navodnike
j=spoji("k","i") treba biti j=spoji(k,i) onda radi.

Ako je ovo za vježbu onda dobro ali u protivnom imaš previše koda. Da bi napravo to na formi što si htio ne trebaju ti moduli, to isto mpžeš dobiti i ovako



Također u deklaraciji modula si napisao

Function Spoji (a As String, b As String) As String

ne treba ti ovo zadnje As string. Dovoljno je

Function Spoji (a As String, b As String)

Funkciju spoji jednostavnije možeš pozvati sa

---

Predmet:Re: Pitanja u vezi procedura i pisanja koda

---

Hvala! Radi!

A zakleo bih se da sam i ovako pokušao.

Primjer je sa časova VB Å¡kole, malo sam vježbao.

Još jednom hvala svima za vrijeme koje izdvajate da, nama koji samo nešto zapitkujemo, tako detaljno odgovorite.

Pozdrav!

Predmet:Re: Pitanja u vezi procedura i pisanja koda

---

Function Spoji(a as string,b As String) As String

a as string-A variabla dimenzionisana kao string odnosno tekst i to ulazna variabla
b As String-isto kao i pradhodno
spoji -variabla deklarisana kao string
to je ovo iza zagrade as strin

ukoliko ne navedemo onda ovo Spoji ili naziv procedure koji je ujedno i izlazna variabla je variant odnosno moze bilti bilo sta.
Integer, double,single currenci, datete ili string.

Bolje je navesi sta je.
U c Jeziku se vraca vrijednost opcijom return a u vb se vraca kroz naziv procedure.

---

Predmet:Re: Pitanja u vezi procedura i pisanja koda

---

Nemoj se ustručavati pitati. Forum za to i služi.

---