[ gygy @ 16.09.2013. 00:38 ] @
Problem je sledeci:
u textbox polje se upisuje neki "text" iz tri dela (primer: 123-GP1-2013)
prvi deo 123 - sadrzi samo cifre i krece od 1 do 6 karaktera (od 1 do 999999)
drugi deo GP1 - ta 3 znaka mogu da budu il GP1 il GP2
treci deo 2013 - to je godina
e sad hocu da namestim posto je samo promenjiv prvi i drugi deo 123 (iz primera) i GP1 (GP2) da ako korisnik ne unese ceo broj 123-GP1-2013 nego unese recimo 1234 da pri izlasku iz textboxa ispise u njemu 1234-GP1-2013.
znaci da automatski stavi GP1 a ako naimenuje recimo 123-GP2 i da se u textbox polje automatski upise 123-GP2-2013.
da li je to izvodljivo?
Unapred hvala
[ Zidar @ 16.09.2013. 15:32 ] @
Umesto jednog, koristis 3 polja:
txtBroj (validation rule Broj>0, Broj <=999999)
txtGP (text; validation rule: txtGP IN ('GP1','GP2') ; DEFAULT 'GP1')
txtGodina (datetime; Validation Rule: txtGodina = 2013; DEFAULT = 2013)

Ako vec dozvoljavas da korisnik preskoci unos GP i Godine, pa ond sam hoces da uneses vrednosti, to znaci da ti te vrednosti i nisu vazne - nisu obavezne da se unesu, a ako se ne unesu ti 'znas' sta treba da se unese - nema bas mnogo smisla zar ne? U tom slucaju zadatak se znatno pojednostavljuje - cuvas i unosis samo brojcani deo, a na kraju u kveriju pokazes vrednosti kao 999999-GP1-2013.

[ izonic @ 17.09.2013. 20:57 ] @
problemcic
Code:
Private Sub Textbox_Change()
Dim X As Integer
Dim GP As String
Dim temp As String

X = Textbox.SelStart
If X > 2 And X < 5 Then
Me.Textbox.SelStart = 0
Me.Textbox.SelLength = X
temp = Me.Textbox.SelText
GP = "-GP" & (5 - X) & "-"
temp = temp & GP & Year(Date)
Me.Textbox = temp
Me.Textbox.SelStart = X
End If
End Sub