Как сделать, чтобы в RTF после точки писалась большая буква? - VB
Формулировка задачи:
Как сделать, чтобы в RTF после точки писалась большая буква? Если можно примерчик.
Решение задачи: «Как сделать, чтобы в RTF после точки писалась большая буква?»
textual
Листинг программы
Private Sub RichTextBox1_KeyPress(KeyAscii As Integer) If Right$(RichTextBox1.Text, 1) = '.' Then KeyAscii = Asc(UCase(Chr(KeyAscii))) End If End Sub