Разделение текста - VB
Формулировка задачи:
В общем, я более чем уверен, что это легко, но до меня до сих пор не дошло... Как разделить текст на строки?
Пример: Имеем текст
---
hafsgha
yw3rghsa
ywqwghaw
4qyawga
---
И нужно отдельно получить каждую строчку. Да, знаю, что функцией Split можно, но не vbNewLine же подставлять в разделители
Решение задачи: «Разделение текста»
textual
Листинг программы
Dim Full As String Full = "Prefix " TextBox1.Text = "" A = Split(RichTextBox1.Text, vbNewLine) For I = 0 To NumericUpDown1.Value - 1 TextBox1.Text = TextBox1.Text + Full + A(I) + vbNewLine Next RichTextBox1.Text = TextBox1.Text
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д