Pogledajte određenu poruku
Staro 25. 10. 2007.   #4
vidak
Banned
Expert
 
Datum učlanjenja: 29.09.2007
Poruke: 458
Hvala: 131
71 "Hvala" u 44 poruka
vidak is on a distinguished road
Default

Ovako

If Len(Zr) < 2 Then
MsgBox "Nite uneli prva tri broj banke! Molimo Vas da poslednja dva broja žiro računa - kontrolni brojevi!"
End If


If Not IsNumeric(Zr) Then
If Len(Zr) > 0 Then
Me.Zr = ""
MsgBox "Nije dozvoljen upis slova, dozvoljeno je samo upisivanje brojeva!"
End If
End If


Ako si to trazio ???
vidak je offline   Odgovorite uz citat