Ja sam pokusao zabraniti unosenje apostrofa u txtbox. Uspio sam ovim kodom zabraniti upisivanmje apostrofa ali dobivam kursor na pocetak txtboxa, sto mi nikako ne odgovara.
Pitanje 2. Kako postaviti kursor na kraj unosa?
Private Sub txtIme_Change()
If Right$(txtIme.Text, 1) = "'" Then
txtIme.Text = Left$(txtIme.Text, Len(txtIme.Text) - 1)
End If
End Sub