Cara menyimpan dan menghapus string di dalam file.text pada Basic4android

hello, assalamualaikum wr, wb 

selamat pagi, di artikel kali ini kita akan membahas cara menyimpan dan menghapus string, sudah kah berkenalan dengan Basic4android. kalau sudah mengerti kita lanjutkan tutorial ini, klo belum mengerti simak saja penjelasan berikut ini.

struktur program Basic4android

 #Region  Project Attributes 

#ApplicationLabel: latihan

#VersionCode: 1

#VersionName: 

'SupportedOrientations possible values: unspecified, landscape or portrait.

#SupportedOrientations: unspecified

#CanInstallToExternalStorage: False

#End Region

#Region  Activity Attributes 

#FullScreen: False

#IncludeTitle: False

#End Region

Sub Process_Globals

End Sub

Sub Globals

   

End Sub

Sub Activity_Create(FirstTime As Boolean)

End Sub

Sub Activity_Resume

End Sub

Sub Activity_Pause (UserClosed As Boolean)

End Sub

syntax di atas adalah hanya sebuah struktur program, untuk memulai tutorial ini simak penjelasan berikut ini,. ohh iya, sebelum itu jangan salah penempatan yah gays

cara menyimpan string di dalam file.text 

1. systax untuk deklarasi variable textwriter

Sub Globals

    Dim TextWriter1 As TextWriter

End Sub

2. systax inisialisasi atau variabel yg menyatakan file.text

Sub Activity_Create(FirstTime As Boolean)

  TextWriter1.Initialize(File.OpenOutput(File.DirInternal, "Text.txt", True))

End Sub

3. systax untuk menyimpan text

Sub Simpan_Text(str As String)

TextWriter1.Initialize(File.OpenOutput(File.DirInternal, "Text.txt", True))

TextWriter1.WriteLine(str)

TextWriter1.Close

End Sub

setelah agan mengetahui cara menyimpan seperti syntax diatas, kita lanjutkan cara untuk menghapusnya berikut syntax untuk menghapus file.text

buatlah sub hapus sperti berikut ini:

Sub hapus

TextWriter1.Initialize(File.OpenOutput(File.DirInternal, "Text1.txt", False))

TextWriter1.Initialize(File.OpenOutput(File.DirInternal, "Text1.txt", True))

End Sub

okey sekian dari saya kurang lebihnya bisa anda beri komentar ...