Sub Globals
Private EditText1 As EditText '
Private Button1 As Button
Private Button2 As Button
Private Button3 As Button
End Sub
Sub Button1_Click
EditText1.Text = File.ReadString(Starter.shared, "1.txt")
.... ' User edits/adds text to EditText1
File.WriteString(Starter.shared, "1.txt", EditText1.Text)
End Sub
Sub Button2_Click
EditText1.Text = File.ReadString(Starter.shared, "2.txt")
.... ' User edits/adds text to EditText1
File.WriteString(Starter.shared, "2.txt", EditText1.Text)
End Sub
Sub Button3_Click
EditText1.Text = File.ReadString(Starter.shared, "3.txt")
.... ' User edits/adds text to EditText1
File.WriteString(Starter.shared, "3.txt", EditText1.Text)
End Sub