На главную Наши проекты:
Журнал   ·   Discuz!ML   ·   Wiki   ·   DRKB   ·   Помощь проекту
ПРАВИЛА FAQ Помощь Участники Календарь Избранное RSS
msm.ru
Модераторы: SCINER, B.V.
  
    > Как определить, что было введено в Textb
      Самый простой алгоритм перед Вами

      ExpandedWrap disabled
        Private Sub Text1_KeyPress(KeyAscii As Integer)
           If IsNumeric(Chr(KeyAscii)) Then
              Me.Caption = "Введена цифра"
           Else
              Me.Caption = "Введена не цифра"
           End If
        End Sub
      Сообщение отредактировано: Andrey_Kun -
      0 пользователей читают эту тему (0 гостей и 0 скрытых пользователей)
      0 пользователей:


      Рейтинг@Mail.ru
      [ Script execution time: 0,0187 ]   [ 16 queries used ]   [ Generated: 27.04.24, 11:48 GMT ]