Novo

Forum kao aplikacija na telefonu

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

  • 4 odgovora
  • 4.790 pregleda

Najnovija ↓

restrikcija praznog polja 18.03.2007. u 11:05 · pre 238 meseci #1
Kako doskociti nasem mentalitetu da namerno ne gresi?
Na to pitanje ne ocekujem da neko zna odgovor, ali na drugo mi mozete pomci.
Naime, imam text box u bazi za unosenje prezimena i imena, sa proveravanjem da li vec postoji isto itd. itd.
Iako postoji jasno uputsvo, korisnici, ako se javi isto ime i prezime lupe space taster izmedju imena i prezimena i to baza tretira kao novu osobu.

Pitanje je kako da napravim masku koja ce dozvoliti da moze da se unese samo jedno prazno polje,
a levo i desno od njega da unos bude proizvolje duzine?
Re: restrikcija praznog polja 18.03.2007. u 17:13 · pre 238 meseci #2
Pa stavi takozvanu masku za to polje, gde ces definisati kako da ti izgleda unos za njega...
Re: restrikcija praznog polja 18.03.2007. u 22:45 · pre 238 meseci #3
Function Provjera(Str As String) As Boolean
'-------------------------------------------------
'Ova funkcija provjerava prazna mjesta u stringu
'Autor funkcije ZXZ
'datum 03.04.2001
'-------------------------------------------------
Dim Prazni As Integer
Dim Znak As String * 1
Dim I As Integer

For I = 1 To Len(Str)
Znak = Mid(Str, I, 1)
If Znak = " " Then
Prazni = Prazni + 1
End If
Next

If Prazni = 1 Then
Provjera = True
Else
Provjera = False
End If

End Function
Potpis
zxz
Re: restrikcija praznog polja 18.03.2007. u 23:56 · pre 238 meseci #4
Pogledao sam ovu temu, ali mi nije bas jasno gde sve ova funkcija ima primenu, u kojim slucajevima?
Pozdrav!
Potpis
Bez muke nema nauke!!!
Re: restrikcija praznog polja 19.03.2007. u 01:43 · pre 238 meseci #5
Funkciju mozes pozvati napr. na on exit polja.
A posto kazes da vrsis provjeru u bazi dali ima takav unos onda najbolje na pocetku te tvoje funkcije ili procedure.
Pozivas je ovako:
dim a as Boolean

a=Provjera(me.imepoljaUpisa)
if a= false then
MsgBox "Neispravan Unos"
Goto Kraj
endif

a Na kraju tvoje procedure napisi a ispred end functio ili end sub:
Kraj:
Potpis
zxz
Prijavite se da biste odgovorili u ovoj temi.PrijavaRegistracija

Premeštanje teme