Dim DirCss As String = File.Combine(File.DirInternal, "dist")
If File.Exists(DirCss, "") = False Then
LogColor("Make Directory", xui.Color_Red)
File.MakeDir(File.DirInternal, "dist")
End If
If File.Exists(DirCss, "style.css") = False Then
LogColor("Create styles.css", xui.Color_Red)
Dim styles As String = $"p {
color: blue;
}"$
File.WriteString(DirCss, "style.css", styles)
End If
LogColor("Reading file from " & File.Combine(DirCss, "style.css"), xui.Color_Blue) 'Reading file from /data/user/0/b4a.example/files/dist/style.css
Log(File.ReadString(DirCss, "style.css"))