Удалить перенос строки - VB

Узнай цену своей работы

Формулировка задачи:

ломаю голову второй день. в общем проблема такая: есть textbox1 с переносом строк - туда записываются 4 строчки текста, пример: строка1 строка2 строка3 строка4 есть одно НО: при последующей записи, строчки такими же будут, то есть файл будет иметь вид: строка1 строка2 строка3 строка4 строка1 строка2 и тд Далее все это записывается в текстовой файл. Записалось в столбик - логично. Но мне нужно потом эти же строчки, при нажатии на другую кнопку загрузить в другой textbox. Загружается только первая строчка (строка1). Вопрос -

как можно преобразовать на начальном уровне записи столбик в одну строчку

, типа такого вида: строка1|строка2|строка3|строка4 ну и естественно загрузить потом каждую строчку в textbox2? или если вариант сложный и геморрный,

тогда чтобы загружались в textbox2 все строчки, а не первая..?!

Заранее огромное спасибо!

Решение задачи: «Удалить перенос строки»

textual
Листинг программы
Private Sub Read_Data(num As Integer)
    Dim s As String
    Open App.Path & "\file.txt" For Input As #1
    While (Not EOF(1))
        Input #1, s
        textbox1.Text = s''''
        Input #1, s
        textbox2.Text = s''''
        Input #1, s
        textbox3.Text = s''''
        Input #1, s
        textbox4.Text = s''''
        If (textbox0.Text = textbox1.Text) Then
            Close #1
            Exit Sub
        End If
    Wend
    Close #1
    MsgBox "not find"
End Sub
 
Private Sub Command2_Click()
    Read_Data (CStr(textbox0.Text)) 'сюда вводим номер вопроса
End Sub

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

12   голосов , оценка 4.25 из 5