|
Ivan_1
|
|
Обработка строк в VB09.06.2011, 22:07. Показов 965. Ответов 0
Метки нет (Все метки)
Задан текст. Напечатать буквы, на которые начинаются слова в тексте, в порядке убывания частоты их употребления. Буквы, на которые начинаются слова, я собрал, а как их отсортировать в порядке убывания не знаю. Private Sub cmdStart_Click() Dim t1 As String, s As String, a As String * 1, c1 As String Dim i As Byte, k As Byte, j As Byte, n As String t1 = txt1.Text & " " k = Len(t1) slovo = "" c1 = "" n = 0 For i = 1 To k a = Mid(t1, i, 1) If a <> " " Then slovo = slovo & a Else c1 = c1 & Mid(slovo, 1, 1) slovo = "" End If Next i lblResult.Caption = c1 End Sub |
|
(| 09.06.2011, 22:07 | |
|
Ответы с готовыми решениями:
0
Обработка строк Обработка строк Обработка строк |
| 09.06.2011, 22:07 | |
|
Помогаю со студенческими работами здесь
1
Обработка строк
обработка строк
Искать еще темы с ответами Или воспользуйтесь поиском по форуму: |
|
Новые блоги и статьи
|
|||
|
Программная установка даты и запрет ее изменения
Maks 02.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2.
Задача: при создании документов установить период списания автоматически. . .
|
Вывод данных в справочнике через динамический список
Maks 01.04.2026
Реализация из решения ниже выполнена на примере нетипового справочника "Спецтехника" разработанного в конфигурации КА2.
Задача: вывести данные из ТЧ нетипового документа. . .
|
Функция заполнения текстового поля в реквизите формы документа
Maks 01.04.2026
Алгоритм из решения ниже реализован на нетиповом документе "ВыдачаОборудованияНаСпецтехнику" разработанного в конфигурации КА2, в дополнении к предыдущему решению.
На форме документа создается. . .
|
К слову об оптимизации
kumehtar 01.04.2026
Вспоминаю начало 2000-х, университет, когда я писал на Delphi. Тогда среди программистов на форумах активно обсуждали аккуратную работу с памятью: нужно было следить за переменными, вовремя. . .
|
|
Идея фильтра интернета (сервер = слой+фильтр).
Hrethgir 31.03.2026
Суть идеи заключается в том, чтобы запустить свой сервер, о чём я если честно мечтал давно и давно приобрёл книгу как это сделать. Но не было причин его запускать. Очумелые учёные напечатали на. . .
|
Модель здравосоХранения 6. ESG-повестка и устойчивое развитие; углублённый анализ кадрового бренда
anaschu 31.03.2026
В прикрепленном документе раздумья о том, как можно поменять модель в будущем
|
10 пpимет, которые всегда сбываются
Maks 31.03.2026
1. Чтобы, наконец, пришла маршрутка, надо закурить. Если сигарета последняя, маршрутка придет еще до второй затяжки даже вопреки расписанию.
2. Нaдоели зима и снег? Не надо переезжать. Достаточно. . .
|
Перемещение выделенных строк ТЧ из одного документа в другой
Maks 31.03.2026
Реализация из решения ниже выполнена на примере нетипового документа "ВыдачаОборудованияНаСпецтехнику" с единственной табличной частью "ОборудованиеИКомплектующие" разработанного в конфигурации КА2. . . .
|