9 Ноябрь 2008

Ввод только цифр в TextBox.

TextBox |  Таги: , ,

Ввод только цифр в TextBox.

Private Sub Text1_KeyPress(KeyAscii As Integer)
    If Not IsNumeric(Chr(KeyAscii)) And KeyAscii <> 8 Then KeyAscii = 0
End Sub

Запись опубликована on 09.11.2008 at 21:48 и размещена в рубрике: TextBox. Вы можете читать комментарии, используя RSS-ленту. Вы можете оставить комментарий, или отправить трекбек с Вашего сайта.



У нас куча комментариев (2) на запись “Ввод только цифр в TextBox.”

Почему бы Вам не высказать свое мнение! Позвольте нам узнать, что Вы думаете...

  1. 1 On 11.11.2008, Anton said:

    А как еще допустить возможность ввода запятой и точки, если цифра с плавающей точкой? Спасибо.

  2. 2 On 14.11.2008, МП41А said:

    Очевидно, для возможности ввода запятой, необходимо будет еще добавить строку KeyAscii Asc(«,») к исходному коду. Также надо будет написать небольшое условие для ограничения количества вводимых запятых.

Оставить комментарий

Я не робот.