Отвечает: HookEst
Здравствуйте, Student - Николай!
Один из способов - это перехватывать событие OnKeyPress, и в зависимости от кода символа разрешать или запрещать ввод этого символа.
Не знаю какого типа у Вас Text1, пишу 2 примера. Один для VB .NET, второй для VBA.
Правда этот способ не поможет от Copy-Paste ,но можно Paste вообще запретить, и все равно желательно всегда перед использованием проверять, чего там User написал.
Удачи.
Приложение:
Ответ отправил: HookEst (статус: 3-ий класс)
Ответ отправлен: 28.09.2006, 06:03 Оценка за ответ: 5
Отвечает: Макаренко Е.В.
Здравствуйте, Student - Николай!
Можно сделать промежуточный буффер - например Text2.
Перенос блока - по кнопке.
При нажатии кнопки - выполнение процедуры анализа
--------- осторожность, точность... и горит все синим пламенем! :))
Ответ отправил: Макаренко Е.В. (статус: Студент)
Ответ отправлен: 28.09.2006, 10:10
Отвечает: VLK
Здравствуйте, Student - Николай!
Если Вам необходимо ограничить ввод только цифр 0, 8 и 9, но допускается ввод иных символов, то следующий пример запрещает пользователю вводить только 0, 8 и 9. Если же наоборот запрещается ввод цифр из диапазона 1-7, исправьте код с учетом того, что коды клавиш от 1 до 7 включительно - 49:55.
Private Sub Text1_KeyPress(KeyAscii As Integer)
Select Case KeyAscii
Case 48
KeyAscii = 0
Case 56
KeyAscii = 0
Case 57
KeyAscii = 0
End Select
End Sub
Ответ отправил: VLK (статус: 7-ой класс)
Ответ отправлен: 29.09.2006, 14:34 Оценка за ответ: 5
Отвечает: Тесленко Евгений Алексеевич
Здравствуйте, Student - Николай!
Также как у Кокорич Вадима Леонидовича , но одной строкой
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii < 49 Or KeyAscii > 55 Then KeyAscii = 0
End Sub
Удачи.
Евгений.
Ответ отправил: Тесленко Евгений Алексеевич (статус: 1-ый класс)
Ответ отправлен: 29.09.2006, 20:55 Оценка за ответ: 5
