Ja sam ovo uradio sa funkcijom koja vraca true kad nadje prekoracenje
Code:
Public Function Validate_Entry as Boolean
If Len(txtAddData(0)) > 50 Then
Call MsgBox("Prešli ste broj dozvoljenih karaktera na polju " & Label(0).Caption, vbCritical, "Greška!")
Validate_Entry = True
Exit Function
End If
.
.
.
end function
Public Function Validate_Entry as Boolean
If Len(txtAddData(0)) > 50 Then
Call MsgBox("Prešli ste broj dozvoljenih karaktera na polju " & Label(0).Caption, vbCritical, "Greška!")
Validate_Entry = True
Exit Function
End If
.
.
.
end function
i ovako 13 puta
Moze li ovo da se uradi sa Select Case naredbom ili nekako drugacije da se ne ponavljaju svaki put zadnje tri naredbe.
Provjera treba da se uradi posto se popune sva polja, pa mi dogadjaji KeyDown i KeyPress ne odgovaraju