Android Question location of String.txt at internal storage

Sub Process_Globals

End Sub

Sub Globals
  
   Dim lstTest As ListView

End Sub

Sub Activity_Create(FirstTime As Boolean)
   addViews
   WriteFiles
End Sub

Sub Activity_Resume

End Sub

Sub Activity_Pause (UserClosed As Boolean)

End Sub

Sub addViews
   lstTest.Initialize("")
   Activity.AddView(lstTest, 0dip, 0dip, Activity.Width, Activity.Height)
End Sub

Sub WriteFiles
   ' This file will be written to the app private storage
   File.WriteString(File.DirInternal, "File One", "This is the data")
   lstTest.AddSingleLine("Wrote file to private storage")
   ' This file will be written to the app public storage.
   ' It will be in sdcard/Android/data/<Package name>/files/
   ' The User will have to give WriteExternalStorage permission
   File.WriteString(File.DirDefaultExternal, "File Two", "This is the data")
   lstTest.AddSingleLine("Wrote file to public storage")
   ' This file will be written to the sdcard root folder.
   ' Again, the User will have to give permission
   File.WriteString(File.DirRootExternal, "File Three", "This is the data")
   lstTest.AddSingleLine("Wrote file to sdcard root")
End Sub

    File.MakeDir(File.DirRootExternal, "My Folder")
    File.WriteString(File.DirRootExternal, "My Folder/MyFile Three", "This is the data")

Sub Process_Globals
    Private rp As RuntimePermissions
End Sub

Sub Globals
     Dim lstTest As ListView
End Sub

Sub Activity_Create(FirstTime As Boolean)
    addViews
    rp.CheckAndRequest(rp.PERMISSION_WRITE_EXTERNAL_STORAGE)
End Sub

Sub Activity_Resume

End Sub

Sub Activity_Pause (UserClosed As Boolean)

End Sub

Sub Activity_PermissionResult (Permission As String, Result As Boolean)
    If Permission = rp.PERMISSION_WRITE_EXTERNAL_STORAGE Then
        WriteFiles
    End If
End Sub

Sub addViews
    lstTest.Initialize("")
    Activity.AddView(lstTest, 0dip, 0dip, Activity.Width, Activity.Height)
End Sub

Sub WriteFiles
    File.MakeDir(File.DirRootExternal, "My Folder")
    File.WriteString(File.DirRootExternal, "My Folder/MyFile Three", "This is the data")
    lstTest.AddSingleLine("File written to storage")
End Sub

Sub Process_Globals
    Private rp As RuntimePermissions
End Sub

B4A Version: 8.50
Parsing code.    (0.00s)
Building folders structure.    (0.01s)
Compiling code.    (0.02s)
Compiling layouts code.    (0.00s)
Organizing libraries.    (0.00s)
Generating R file.    Error
ERROR: In <declare-styleable> FontFamilyFont, unable to find attribute android:fontVariationSettings
ERROR: In <declare-styleable> FontFamilyFont, unable to find attribute android:ttcIndex

'This code will be applied to the manifest file during compilation.
'You do not need to modify it in most cases.
'See this link for for more information: https://www.b4x.com/forum/showthread.php?p=78136
AddManifestText(
<uses-sdk android:minSdkVersion="5" android:targetSdkVersion="26"/>
<supports-screens android:largeScreens="true"
    android:normalScreens="true"
    android:smallScreens="true"
    android:anyDensity="true"/>)
SetApplicationAttribute(android:icon, "@drawable/icon")
SetApplicationAttribute(android:label, "$LABEL$")
CreateResourceFromFile(Macro, Themes.DarkTheme)
'End of default text.