Цитата |
---|
Ігор Гончаренко написал: а какое отношение первый символ в TextBox имеет к тем, которые добавляются и добавляются в TextBox.даже если в Ваш TextBox символы добавляются справа на лево... и то не факт, что каждый новый символ добавляется в самой левой позиции текста |
Всё верно написано, правильнее будет скорее:
Код |
---|
asciicode = Asc(Right(TextBox.Text, 1))
Select Case asciicode
Case 48 To 57
Case 65 To 90, 97 To 122
Case Else
End Select |
Последний введённый символ, по логике будет располагаться справа (но не факт, зависит от положения курсора, но я упрощаю задачу, т.к. у Вас своя логика).
Но суть проверки всё равно не пойму, сделайте кнопку. Отлов на изменение текстбокса, в данной задаче, лишняя непонятная и нерациональная примочка