Функция, преобразующая строку в имя собственное - VB
Формулировка задачи:
Скажите, есть ли встроенная функция для преобразования строки в имя. напр.
есть имя: иванов иван иванович. после преобразования должно быть:
Иванов Иван Иванович. т.е. первые буквы каждого слова преобразовываются в заглавные.
есть имя: иванов иван иванович. после преобразования должно быть:
Иванов Иван Иванович. т.е. первые буквы каждого слова преобразовываются в заглавные.
Решение задачи: «Функция, преобразующая строку в имя собственное»
textual
Листинг программы
<font color="blue">Private</font> <font color="blue">Sub</font> Text1_KeyPress(KeyAscii <font color="blue">As</font> <font color="blue">Integer</font>)
<font color="blue">With</font> Text1
.Text = StrConv(.Text, vbProperCase)
.SelStart = Len(.Text)
<font color="blue">End</font> <font color="blue">With</font>
<font color="blue">End</font> <font color="blue">Sub</font>