Этот баннер — требование Роскомнадзора для исполнения 152 ФЗ.
«На сайте осуществляется обработка файлов cookie, необходимых для работы сайта, а также для анализа использования сайта и улучшения предоставляемых сервисов с использованием метрической программы Яндекс.Метрика. Продолжая использовать сайт, вы даёте согласие с использованием данных технологий».
Политика конфиденциальности
Новые сообщения [новые:0]
Дайджест
Горячие темы
Избранное [новые:0]
Форумы
Пользователи
Статистика
Статистика нагрузки
Мод. лог
Поиск
|
|
28.11.2003, 08:08
|
|||
|---|---|---|---|
Смена регистра (нижний -> верхний) |
|||
|
#18+
Задумка такая: "Выделить" и преобразовать первое слово в тексте в верхний регистр! Прошу помощи!!! И еще вопрос: может ли VB работать с UNICOD`ом, в частности как сохранить текст в UNICOD`e методом PRINT? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
28.11.2003, 11:25
|
|||
|---|---|---|---|
|
|||
Смена регистра (нижний -> верхний) |
|||
|
#18+
'выделенный текст преобразуешь в верхний регистр 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 ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
start [/forum/topic.php?fid=60&mobile=1&tid=2170407]: |
0ms |
get settings: |
8ms |
get forum list: |
15ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
36ms |
get topic data: |
8ms |
get forum data: |
2ms |
get page messages: |
31ms |
get tp. blocked users: |
1ms |
| others: | 219ms |
| total: | 326ms |
| 0 / 0 |
