powered by simpleCommunicator - 2.0.54     © 2025 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Отключение Beep, связанное с MaxLength текстового поля
5 сообщений из 5, страница 1 из 1
Отключение Beep, связанное с MaxLength текстового поля
    #37518435
Arthur26
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Здравствуйте.
На форме есть текстовое поле и ee свойство MaxLength = 6.
Можно ли отключить как-то Beep (пищалку), выдаваемое при вводе 7-го символа в текстовое поле?
Спасибо за советы.
...
Рейтинг: 0 / 0
Отключение Beep, связанное с MaxLength текстового поля
    #37518448
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Не ограничивать MaxLength, но реагировать на Change и резать по ограничению вручную

правда немножно придется извернуться, чтобы корректно отрабатывать ввод в середину текста, но искусство требует жертв
...
Рейтинг: 0 / 0
Отключение Beep, связанное с MaxLength текстового поля
    #37518479
Arthur26
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А можно так?

Private Sub Text1_KeyPress(KeyAscii As Integer)
If Len(Text1) = 6 Then
If KeyAscii <> 8 Then
KeyAscii = 0
End If
End If
End Sub
...
Рейтинг: 0 / 0
Отключение Beep, связанное с MaxLength текстового поля
    #37518548
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Можно... но надо защитить, тем не менее, от вставки из буфера
...
Рейтинг: 0 / 0
Отключение Beep, связанное с MaxLength текстового поля
    #37520400
Фотография BelowZero
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
правда, лучше обрабатывать ченч. тогда отпадают проблемы с буфером
...
Рейтинг: 0 / 0
5 сообщений из 5, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Отключение Beep, связанное с MaxLength текстового поля
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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