Makalah Biologi tentang Tumbuhan Mangrove dan Tanaman Hias

     Cara mengedit data yang telah kita simpan di dalam file txt dapat kita lakukan edit, caranya mudah bgeet tapi kalian harus jeli melihat program yang ada...
di bawah ini ada potongan program untuk mengedit data di TXT :

nim = InputBox("Masukkan NIM:")
Open App.Path & "\data.txt" For Input As #1

'masukkan data ke textbox
Do While Not EOF(1)
  Input #1, s
  fd = Split(s, "|")
  If Trim(fd(0)) = nim Then
     txtNim.Text = fd(0)
     txtNama.Text = fd(1)
     txtJur.Text = fd(2)
     Exit Do
  End If
Loop
Close #1

'-- hapus file lama copy ke yg baru kecuali record yg di edit
Open App.Path & "\data.txt" For Input As #1
Open App.Path & "\datasem.txt"
For Output As #2
Do While Not EOF(1)
  Input #1, s
  fd = Split(s, "|")
  If Trim(fd(0)) <> nim Then
    Print #2, Chr(34) & s & Chr(34)
  End If
Loop
Close #1
Close #2

Kill App.Path & "\data.txt"
FileCopy App.Path & "\datasem.txt", App.Path & "\data.txt"

Nah begitulah  programnya, silahkan anda mencobanya sendiri..