Visual Basic 6.0. Фильтрация недопустимых и ограничения количества вводимых символов
02-05-2015 21:52
к комментариям - к полной версии
- понравилось!
вверх^
к полной версии
понравилось!
в evernote
Private Sub Text1_KeyPress(KeyAscii As Integer) ' Процедура фильтрации символов, недопустимых в файловых именах
Select Case KeyAscii
Case 34, 42, 47, 58, 60, 62, 63, 92, 124
KeyAscii = 0
End Select
Text1.MaxLength = 256 - Len(File1.Path + "\") ' Ограничение количества символов для файлового имени
End Sub
В этом листинге:
File1 — указание на элемент управления FileListBox, в котором пользователь выбрал переименовываемый файл.
Text1 — указание на элемент управления TextBox, в который пользователь вводит новое имя файла перед переименованием.
Вы сейчас не можете прокомментировать это сообщение.
Дневник Visual Basic 6.0. Фильтрация недопустимых и ограничения количества вводимых символов | mozgotron - Дневник mozgotron |
Лента друзей mozgotron
/ Полная версия
Добавить в друзья
Страницы:
раньше»