Построчная запись в файл - VB

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

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

что делать если в текстовом файле получается запись данных на одной строке постоянно?? например когда я ввожу какое либо значение текст продолжает писаться с права на этой же строке а не начинает запись ниже!! как сделать запись ниже на одну строку при вводе новых данных пример: 1 строка : "я" 2 строка: " 123" и так далее

Решение задачи: «Построчная запись в файл»

textual
Листинг программы
Private Type myRecord
  Name As String
  Lng As Integer
  Exist As Boolean
End Type
 
Dim slovo As myRecord
 
Private Sub Command1_Click()
 
 slovo.Exist = True
 slovo.Name = "Ж..а"
 slovo.Lng = 100
 
 Write_Data
End Sub
Public Sub Write_Data()
On Error Resume Next
Dim i As Integer
 Open App.Path + "\" + "Text_Output" + ".txt" For Append As #1
        Print #1, slovo.Name
  Close #1
End Sub

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


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

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

9   голосов , оценка 4.111 из 5