27. september 2003 - 14:09Der er
4 kommentarer og 1 løsning
Slette sidst indtastede tegn i en tekstboks
I en tekstboks tester jeg om de tegn brugeren indtaster er gyldige jf. mine specifikationer. Hvis de ikke er gyldige kommer en msgbox og meddeler dette, men jeg vil også gerne have slettet det sidst indtastede (ugyldige) tegn.
I en anden tekstboks vil jeg i stedet for at slette bare have teksten markeret således at den overskrives når der tastes igen.
>>Tubber Tekstmarkeringen fungerer fint :-), så det eneste der mangler nu er at få cursor'en til at stå der hvor det slettede tegn stod. Håber nogen kan klare den :-D
I vba kan du jo tjekket alle tegn, hvis du ikke vil have det, kan du annulere med en tom. Eks.
Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger) If KeyAscii = 197 Then ' hvis det er stort Å MsgBox "tegnet " & Chr(KeyAscii) & " er ikke tilladt" KeyAscii = 0 ' intet tegn End If End Sub
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.