Сохранение и чтение данных из TextBox в TXT - VB

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

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

Доброго времени суток, Излагаю суть проблемы: в программе используются ГОСТы для распила древесины, на случай необходимости их корректировки решил разместить их в txt'шном файле. Теперь пытаюсь выяснить как загрузить данные из этого самого файла и как загрузить, чтобы можно было из программы внести изменения на форме и сохранить. На скрине форма с TextBox'ами , из которой и в которую надо грузить данные. Предполагаю, что вопрос не впервые возник, поэтому буду признателен как хорошим ответам, так и дельным ссылкам на похожие темы. Заранее спасибо.

Решение задачи: «Сохранение и чтение данных из TextBox в TXT»

textual
Листинг программы
Private Sub Command1_Click()
Open "1.txt" For Output As #1
For i = 0 To 5 
    Print #1, Text1(i).Text
Next
Close #1
End Sub
 
Private Sub Form_Load()
On Error Resume Next ' Если нет файла с данными
Dim S As String
Open "1.txt" For Input As #1
    For i = 0 To 5 ' (у меня 6 элементов)
    Input #1, S
    Text1(i).Text = S
    Next
Close #1
End Sub

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

9   голосов , оценка 4 из 5
Похожие ответы