Добавить в начале и в конце текста определенные символы

@GeorgyTheBlack · Регистрация: 18.07.2016

Студворк — интернет-сервис помощи студентам

Добрый вечер! Требуется сделать программу, которая будет генерировать XML файл, используя свою кодировку - <Caption>TEXT</Caption>. Вместо TEXT должен быть текст, введенный в TextBox. Далее сохранять его в таком формате... Ну дальше я сам. Главное принцип работы понять.

Объясняю подробнее. Программа генерирует числа. Нужно чтобы она воспринимала каждую строку и каждый генерированный текст.

Вот допустим программа сгенерировала следующее:
637-780-548-646
960-505-713-120
813-866-249-301
236-592-415-675
989-953-851-856
412-678-117-330
735-403-282-703
587-764-718-885
910-490-884-358
333-215-149-732
186-576-586-913
509-301-751-387
362-662-287-569

И мне нужно, чтобы каждая строка воспринималась программой и добавляла в начале и в конце <Caption></Caption>. В итоге должно получится следующее:
<Caption>637-780-548-646</Caption>
<Caption>960-505-713-120</Caption>
<Caption>813-866-249-301</Caption>и т.д.
То есть сохранять текст - но в начале добавлять определенные символы (<caption></caption). Вроде объяснил понятно.

@MrCrown · 16.07.2017, 13:19

Принцип такой

VB.NET
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
Dim lines() As String = {
            "637-780-548-646",
            "960-505-713-120",
            "813-866-249-301",
            "236-592-415-675",
            "989-953-851-856",
            "412-678-117-330",
            "735-403-282-703",
            "87-764-718-885",
            "910-490-884-358",
            "333-215-149-732",
            "186-576-586-913",
            "509-301-751-387",
            "362-662-287-569"
        }
        Dim res As New List(Of String)
        For Each el In lines
            res.Add("<Caption>" & el & "</Caption>")
        Next
        IO.File.WriteAllLines("c:\01.txt", res)

Ну, дальше ты сам...

Добавлено через 13 часов 54 минуты
Если эти строки уже находятся в текстбоксе, то 1 строку можно переписать так

VB.NET
1
Dim lines() As String = TextBox1.Lines

@GeorgyTheBlack · 16.07.2017, 23:49 **[ТС]**

MrCrown, ОГРОМНОЕ спасибо, но есть еще небольшой вопрос. Допустим в XML файле должны быть кавычки, но в VB.NET они воспринимаются не так как надо. Как можно сделать кавычки после res.Add, чтобы внутри него мог быть текст тоже с кавычками?

Добавлено через 6 минут
MrCrown, Код может быть слишком длинным, и chr(34) будет очень долго.

Добавлено через 46 минут
Ах да, нужно еще чтобы он в начале добавлял тег
<?xml version="1.0" encoding="utf-8"?><address_book version="67001"><groups/><connections>

@MrCrown · 17.07.2017, 00:04

Сообщение от GeorgyTheBlack

Код может быть слишком длинным, и chr(34) будет очень долго

Не понял

Сообщение от GeorgyTheBlack

Ах да, нужно еще чтобы он в начале добавлял тег
<?xml version="1.0" encoding="utf-8"?><address_book version="67001"><groups/><connections>

VB.NET
1
2
3
4
Dim res As New List(Of String)
        res.Add("<?xml version=""1.0"" encoding=""utf-8""?><address_book version=""67001""><groups/><connections>")
        For Each el In lines
        ' ' '

@GeorgyTheBlack · 17.07.2017, 12:46 **[ТС]**

MrCrown, Большое спасибо!!!

Новые блоги и статьи Все статьи Все блоги /
Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT bedvit 28.01.2026 Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .	Загрузка PNG с альфа-каналом на SDL3 для Android: с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 28.01.2026 Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .	Загрузка PNG с альфа-каналом на SDL3 для Android: с помощью SDL3_image 8Observer8 27.01.2026 Содержание блога SDL3_image - это библиотека для загрузки и работы с изображениями. Эта пошаговая инструкция покажет, как загрузить и вывести на экран смартфона картинку с альфа-каналом, то есть с. . .	влияние грибов на сукцессию anaschu 26.01.2026 Бифуркационные изменения массы гриба происходят тогда, когда мы уменьшаем массу компоста в 10 раз, а скорость прироста биомассы уменьшаем в три раза. Скорость прироста биомассы может уменьшаться за. . .
Воспроизведение звукового файла с помощью SDL3_mixer при касании экрана Android 8Observer8 26.01.2026 Содержание блога SDL3_mixer - это библиотека я для воспроизведения аудио. В отличие от инструкции по добавлению текста код по проигрыванию звука уже содержится в шаблоне примера. Нужно только. . .	Установка Android SDK, NDK, JDK, CMake и т.д. 8Observer8 25.01.2026 Содержание блога Перейдите по ссылке: https:/ / developer. android. com/ studio и в самом низу страницы кликните по архиву "commandlinetools-win-xxxxxx_latest. zip" Извлеките архив и вы увидите. . .	Вывод текста со шрифтом TTF на Android с помощью библиотеки SDL3_ttf 8Observer8 25.01.2026 Содержание блога Если у вас не установлены Android SDK, NDK, JDK, и т. д. то сделайте это по следующей инструкции: Установка Android SDK, NDK, JDK, CMake и т. д. Сборка примера Скачайте. . .	Использование SDL3-callbacks вместо функции main() на Android, Desktop и WebAssembly 8Observer8 24.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .

@GeorgyTheBlack -14 / -8 / 0 Регистрация: 18.07.2016 Сообщений: 85

	Добавить в начале и в конце текста определенные символы 15.07.2017, 22:53. Показов 1391. Ответов 4 Метки нет (Все метки) Добрый вечер! Требуется сделать программу, которая будет генерировать XML файл, используя свою кодировку - <Caption>TEXT</Caption>. Вместо TEXT должен быть текст, введенный в TextBox. Далее сохранять его в таком формате... Ну дальше я сам. Главное принцип работы понять. Объясняю подробнее. Программа генерирует числа. Нужно чтобы она воспринимала каждую строку и каждый генерированный текст. Вот допустим программа сгенерировала следующее: 637-780-548-646 960-505-713-120 813-866-249-301 236-592-415-675 989-953-851-856 412-678-117-330 735-403-282-703 587-764-718-885 910-490-884-358 333-215-149-732 186-576-586-913 509-301-751-387 362-662-287-569 И мне нужно, чтобы каждая строка воспринималась программой и добавляла в начале и в конце <Caption></Caption>. В итоге должно получится следующее: <Caption>637-780-548-646</Caption> <Caption>960-505-713-120</Caption> <Caption>813-866-249-301</Caption>и т.д. То есть сохранять текст - но в начале добавлять определенные символы (<caption></caption). Вроде объяснил понятно. 0

@GeorgyTheBlack -14 / -8 / 0 Регистрация: 18.07.2016 Сообщений: 85
	16.07.2017, 23:49 [ТС]
	MrCrown, ОГРОМНОЕ спасибо, но есть еще небольшой вопрос. Допустим в XML файле должны быть кавычки, но в VB.NET они воспринимаются не так как надо. Как можно сделать кавычки после res.Add, чтобы внутри него мог быть текст тоже с кавычками? Добавлено через 6 минут MrCrown, Код может быть слишком длинным, и chr(34) будет очень долго. Добавлено через 46 минут Ах да, нужно еще чтобы он в начале добавлял тег <?xml version="1.0" encoding="utf-8"?><address_book version="67001"><groups/><connections> 0

@GeorgyTheBlack -14 / -8 / 0 Регистрация: 18.07.2016 Сообщений: 85
	17.07.2017, 12:46 [ТС]
	MrCrown, Большое спасибо!!! 0

Добавить в начале и в конце текста определенные символы

Решение