Dear Setia Bungsu,
Ok, saya akan mencoba menjawab pertanyaan
Untuk melakukan konfirmasi atas perubahan yang telah dilakukan anda
harus memonitor terlebih dahulu perubahan tersebut. Contohnya seperti
ini :
'saya asumsikan file anda disimpan dalam bentuk text
Dim OldNama As String
Dim OldAlamat As String
LocTextFile = "C:\test.txt"
Private Sub BukaData(ByVal LocTextFile As String)
Open LocTextFile For Input As #1 'Buka file
Line Input #1, OldNama 'Baca data baris pertama
Line Input #1, OldAlamat 'Baca data baris kedua
Close #1 'Tutup File file text
txtNama.Text = OldNama
txtAlamat.Text = OldAlamat
End Sub
Private Sub SimpanData(ByVal LocTextFile As String)
Open LocTextFile For Output As #1 'Buka file
Print #1, Trim(txtNama.Text) 'Simpan Baris Pertama
Print #1, Trim(txtAlamat.Text) 'Simpan Baris Kedua
End Sub
Semoga dengan sedikit kode tersebut dapat membantu anda.
Terima Kasih.
Salam,
Aiska Hendra
