![]() |
| [ Главная ] [ Статьи ] [ Для новичков ] [ Примеры ] [ Программы ] [ Microsoft Agent 2.0 ] [ Пособие ] [ Уроки ] [ Разное ] |
|
Устанавливаем на форму 1 textbox
Private Sub Text1_KeyPress(KeyAscii As Integer) Select Case KeyAscii Case 48 To 57 Case Else KeyAscii = 0 End Select End Sub |
|
|
|
|
>>> Подпишись на рассылку - будешь получать новые статьи , примеры и много полезной информации из первых рук!!! |
>>>Если у вас есть статья которой нет на сайте
пришлите ее мне--------> Послать статью >>>Если вы хотите задать вопрос пишите--------> Мне нужна помощь |
|
|
|
|
|
|