Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Смена регистра (нижний -> верхний) / 2 сообщений из 2, страница 1 из 1
28.11.2003, 08:08
    #32337362
Boyler
Boyler
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Смена регистра (нижний -> верхний)
Задумка такая:
"Выделить" и преобразовать первое слово в тексте в верхний регистр!
Прошу помощи!!!

И еще вопрос: может ли VB работать с UNICOD`ом, в частности как сохранить текст в UNICOD`e методом PRINT?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
28.11.2003, 11:25
    #32337553
GID
GID
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Смена регистра (нижний -> верхний)
'выделенный текст преобразуешь в верхний регистр
SelText = UCase(Mid(Text1.Text, Text1.SelStart + 1, Text1.SelLength))
'или
'SelText = UCase(Text1.SelText)

'кусок до выделения
OtherText1 = Mid(Text1.Text, 1, Text1.SelStart)
'кусок после выделения
OtherText2 = Mid(Text1.Text, Text1.SelStart + Text1.SelLength + 1)

'формируешь новую строку
Text1.Text = OtherText1 & SelText & OtherText2
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Смена регистра (нижний -> верхний) / 2 сообщений из 2, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]