Novo

Forum kao aplikacija na telefonu

Dodajte forum na početni ekran i koristite ga kao aplikaciju, sa menijem na dnu ekrana.

  • 8 odgovora
  • 4.621 pregleda

Najnovija ↓

Trim funkcija za access2000 17.09.2004. u 12:50 · pre 269 meseci #1
Može li tko pomoći oko trim funkcije za access 2000. Imam brojeve u text box-u koji se nalazi u nekoj subformi koji izgledaju ovako 1111 11 11 11 mogu biti i 1111 11 itd. (postoje razne kombinacije upisanih brojeva) uglavnom kako da maknem razmak između brojeva (da izgledaju npr. 11111111). Probao sam sa trim (ime_text_box-a), ali ništa se ne događa. Kako da to riješim jer ima previše upisanih podataka da bi ručno mijenjao
Hvala
Re: Trim funkcija za access2000 17.09.2004. u 13:50 · pre 269 meseci #3
Sorry, pokušavam ali javlja grešku, stvarno ne razumijem gdje da upišem Replace(ime_text_box-a," ",""), , ako ti nije problem taj kod u cjelosti napisati
puno hvala na trudu
Re: Trim funkcija za access2000 17.09.2004. u 16:42 · pre 269 meseci #4
vec ti je napisao ceo kod, samo umesto
trim(ime_text_box-a)
napises
Replace(ime_text_box-a," ","")
obrati paznju samo da izmedju prvih navodnika imas znak "space" (imas razmak), a izmedju drugih nemas nista (prazan string), ova funkcija ce svaki znak razmaka u text polju da ti zameni sa praznim stringom, to jest uklonice ti svaki znak razmaka

funkcija koju si ti koristio (Trim) uklanja znake razmaka samo sa pocetka i kraja stringa, a ne i iz sredine
Potpis

So Long, and Thanks for All the Fish


Re: Trim funkcija za access2000 17.09.2004. u 17:09 · pre 269 meseci #5
Napisao sam tako, ime text boxa je Podbroj i stavio sam npr.

Private Sub Podbroj_GotFocus()
Replace(Podbroj," ","")
End Sub

i javi mi grešku

Compile error:
Expected: =

Gdje onda griješim?
Re: Trim funkcija za access2000 17.09.2004. u 18:36 · pre 269 meseci #6
pa za pocetak probaj

Private Sub Podbroj_GotFocus()
Podbroj.Text = Replace(Podbroj," ","")
End Sub
Potpis

So Long, and Thanks for All the Fish


Re: Trim funkcija za access2000 17.09.2004. u 20:35 · pre 269 meseci #7
Napokon je uspjelo, ljudi hvala Vam pogotovo JogyII-ju i kloktor-u
kada napišem samo Podbroj.Text = Replace(Podbroj, " ", "") opet javlja grešku, ali kad sam ovako napisao onda je proradilo

Private Sub Podbroj_GotFocus()
If Not IsNull(Me.Podbroj) Then
Podbroj.Text = Replace(Podbroj, " ", "")
End If
End Sub

još jednom hvala
pozdrav
Re: Trim funkcija za access2000 17.09.2004. u 20:47 · pre 269 meseci #8
ma nema na cemu :)

a ovu gresku ti je javio jer polje nije bilo popunjeno, probaj ovo :
Private Sub Podbroj_GotFocus()
Podbroj.Text = Replace(Nz(Podbroj.Text,""), " ", "")
End Sub



Potpis

So Long, and Thanks for All the Fish


Re: Trim funkcija za access2000 17.09.2004. u 20:54 · pre 269 meseci #9
nemoj biti tako skroman ubijam se već tri četiri dana oko toga i nikako (naravno sa trim funkcijom) tako da je ovo bila velika pomoć

inače polje je bilo popunjeno ali brojevi su već bili poredani bez razmaka, ali ima i nekih koji su prazni ali nije fokus stigao do njih tako da ta prazna polja nebi trebala praviti probleme ako fokus nije na njima (bar se nadam),

ali nema veze riješio sam i probat ću ovaj novi kod da vidim kako to radi
Prijavite se da biste odgovorili u ovoj temi.PrijavaRegistracija

Premeštanje teme