ASCII-коды, есть вопросик

[DAN1L]

Мне нужно что бы в TextBox вводить можно было только русские буквы и пробелы, как сделать только русские буквы я нашел, а вот с пробелом не могу, подскажите)

Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
If KeyAscii < "192" Then
MsgBox "Недопустимый символ!"
KeyAscii = 0
End If
End Sub

[С.М.С]

Ну а пробел вроде 32 в десятичной, надо уточнить, вот и добавьте в условие.

[Скрипт]

Вот так можно смотреть ASCII-код символа, который вводят в TextBox:

Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
    MsgBox KeyAscii
End Sub

Хотя сейчас ещё раз стал тестировать, для русских букв Юникод кажется показывает.

[С.М.С]

ТС Вы поняли, что надо сделать или не совсем?

[DAN1L]

Сообщение от С.М.С

ТС Вы поняли, что надо сделать или не совсем?

Задаю обычное условие через "и" не работает, и так уже и так, и выделял что бы до 31 и от 33 до 192 значения просматривались, все равно не идет

[С.М.С]

да вроде работает

Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
If KeyAscii < "192" And KeyAscii <> "32" Then
MsgBox "Недопустимый символ!"
KeyAscii = 0
End If
End Sub

[DAN1L]

Сообщение от С.М.С

да вроде работает

Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
If KeyAscii < "192" And KeyAscii <> "32" Then
MsgBox "Недопустимый символ!"
KeyAscii = 0
End If
End Sub

Мда, беда у меня)) нужно повторить условия)) Спасибо и правда все работает)

[IgorGO]

так, общее замечание:
KeyAscii - это число и корректнее было бы сравнивать его с числами, а не со строками, в которых записаны числа.

If KeyAscii < 192 And KeyAscii <> 32 Then...

[Скрипт]

Цитата из встроенной справки VBA по событию "KeyPress":
KeyANSI (хотя здесь Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger) указано KeyAscii)
Required. An integer value that represents a standard numeric ANSI key code.

Но у русской буквы "А" ANSI-код 192.

А событие "KeyPress" даёт число 1040.

Почему несовпадение по кодам? Ошибка в справке? Ведь 1040 - это Unicode-код буквы "А".