12 Ноябрь 2008

Как разделить строку на массив

Массив, Строки |  Таги: , , ,

Как разделить строку на массив?

Один из читателей — Ринат, попросил помочь ему и навести на мысль при написании программы обработки большого фрагмента текста. Так что с удовольствием помогу и приведу не большой кусок кода, который позволит разделить строку на массив и далее оперировать с элементами массива.

В исходных данных такая строка: спасите & помогите
Необходимо получить: спасите & (спасите)помогите

Ну что же я Вас наведу на мысли, а дальше Вы сами, кстати буду рад увидеть, что у Вас получиться, так что пишите.

Option Explicit
Dim strText As String
Dim arrString() As String

Private Sub Command1_Click()
arrString() = Split(Text1.Text, "&")
Text1.Text = arrString(0) + "& (" + Trim(arrString(0)) + ")" + Trim(arrString(1))
End Sub

Private Sub Form_Load()
Text1.Text = "спасите & помогите"
End Sub

Запись опубликована on 12.11.2008 at 22:57 и размещена в рубрике: Массив, Строки. Вы можете читать комментарии, используя RSS-ленту. Вы можете оставить комментарий, или отправить трекбек с Вашего сайта.



У нас куча комментариев (4) на запись “Как разделить строку на массив”

Почему бы Вам не высказать свое мнение! Позвольте нам узнать, что Вы думаете...

  1. 1 On 27.03.2009, salens said:

    Пример похожий под мою проблему, но не совсем точен. Мне надо разбить строку на массив и чтобы массив генерировал каждый символ т.е каждую букву? Помогите пожайлуста!!!

  2. 2 On 27.03.2009, Александр said:

    salens не совсем понял что Вам требуется сделать

  3. 3 On 30.11.2010, Anatoliy said:

    Александр, думаю, salens имеет ввиду, что бы программа разбивала строку по-символьно в массив. Т.е. заполнить массив символами из строки. 1-я буква(цифра,символ) строки = 1-му элементу массива, 2-я буква строки = 2-му элемету массива. Размер массива = Длине строки.

  4. 4 On 30.11.2010, Anatoliy said:

    М сори, заработался совсем, т.е. наоборот 1 элемент массива = 1 символу(букве, цифре) строки

Оставить комментарий

Я не робот.