powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Вопрос по textbox
9 сообщений из 9, страница 1 из 1
Вопрос по textbox
    #34586971
abcdefg
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
я извиняюсь за глупый вопрос. Мне нужно вводить в текстбокс дробное число в формате , чтобы разделителем была точка, например 1.25 ,а если вводится 1,25 то тогда пусть выходит сообщение что число введено неправильно. Заранее вам спасибо
...
Рейтинг: 0 / 0
Вопрос по textbox
    #34587039
Фотография gjghjc
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
проверяй на isnumeric
...
Рейтинг: 0 / 0
Вопрос по textbox
    #34587710
Диса
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
abcdefgя извиняюсь за глупый вопрос. Мне нужно вводить в текстбокс дробное число в формате , чтобы разделителем была точка, например 1.25 ,а если вводится 1,25 то тогда пусть выходит сообщение что число введено неправильно. Заранее вам спасибо


в событии КлаваПридавлена по коду символа проверяй, если зпт нажата тогда и выводи сообщалку, что фигово поступаете, вводите мол тчк.
...
Рейтинг: 0 / 0
Вопрос по textbox
    #34587712
Диса
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
кстати, там же можно делать перехват и если не то вводит пользователь, то этот символ вообще можно не пускать, например, сделать так, чтобы кроме чисел и точки ничего не вводилось
...
Рейтинг: 0 / 0
Вопрос по textbox
    #34587827
Valeriu
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Можно например так:

Код: plaintext
1.
2.
3.
4.
5.
6.
Private Sub txtNr_KeyPress(KeyAscii As Integer)
'MsgBox KeyAscii
If KeyAscii =  44  Then
MsgBox "В этом поле ожидается ввод точки (.)  !!!", vbOKOnly, "Atentie !!!"
KeyAscii =  0 
Exit Sub
End If
...
Рейтинг: 0 / 0
Вопрос по textbox
    #34588029
Диса
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ValeriuМожно например так:

Код: plaintext
1.
2.
3.
4.
5.
6.
Private Sub txtNr_KeyPress(KeyAscii As Integer)
'MsgBox KeyAscii
If KeyAscii =  44  Then
MsgBox "В этом поле ожидается ввод точки (.)  !!!", vbOKOnly, "Atentie !!!"
KeyAscii =  0 
Exit Sub
End If


Я именно об этом и сказал, вот только нужно так

Valeriu
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
Private Sub txtNr_KeyPress(KeyAscii As Integer)
'MsgBox KeyAscii
if( KeyAscii= 44 )then
   MsgBox "В этом поле ожидается ввод точки (.)  !!!", vbOKOnly, "Atentie !!!"
   KeyAscii =  0 
elseif not((keyascii> 47 )and(keyascii< 58 ))Then
   MsgBox "Жмите цифры 1234567890!!!", vbOKOnly, "Atentie !!!"
   KeyAscii =  0 
End If
...
Рейтинг: 0 / 0
Вопрос по textbox
    #34588530
YuraL
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Привет,
Есть еще вариант,мы в свое время вместо Textbox использовали другой ocx-control
( забыл название за 3 года..типа MaskText - но он стандартный, поищите ) - так там можно было просто определить Mask на input например numeric - который воспринимает только цыфры и т.д.
Приношу извинения за не полную информацию..
...
Рейтинг: 0 / 0
Вопрос по textbox
    #34588555
Диса
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
YuraLПривет,
Есть еще вариант,мы в свое время вместо Textbox использовали другой ocx-control
( забыл название за 3 года..типа MaskText - но он стандартный, поищите ) - так там можно было просто определить Mask на input например numeric - который воспринимает только цыфры и т.д.
Приношу извинения за не полную информацию..


Этот стандартный называется MaskEdit, да и там можно, но там строгая маска, а что мы предлагали, хоть на десять километров сделать запись можно и всё из цифр и точки
...
Рейтинг: 0 / 0
Вопрос по textbox
    #34590115
abcdefg
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
спасибо большое то что мне нужно
...
Рейтинг: 0 / 0
9 сообщений из 9, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Вопрос по textbox
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]