Конроль при вводе текста в TextBox`e

[Алексей К.]

в текстбоксе пользователь вводит имя файла, можно ли сделать так чтобы недопустимые символы в имени файла (: / \ ? * [ ]) не вводились. Т.е. как в Excel`e при вводе имени листа эти символы не воспринимаются. Или только один способ - контроль имени на предмет содержания этих символов после ввода имени файла.

[xolod]

Код: Выделить всё

Private Sub Text1_KeyPress(KeyAscii As Integer)
  If InStr(1, "\/:*?""""<>|", Chr(KeyAscii), vbTextCompare) > 0 Then KeyAscii = 0
End Sub


[xolod]

PS: В excel'е фильтруются только знаки \ : ?
Потому как они используются как системные в названиях листов.. А знаки < > | / * и т.п. можно свободно использовать. Ну это так, для справки

[Olga]

Можно отлавливать вводимые символы и проверять, есть ли среди них недопустимые. Если есть, то не отражать их в TextBox

[Sirik]

Лучше отлавливать событие потеря фокуса с Text и уже там проверять наличие указанных символов.

[Алексей К.]

Спасибо всем! Вроде пример кода xolod`а работает как нужно:D