Sub WebViewAssetFile (FileName As String) As String
#if B4J
Return File.GetUri(File.DirAssets, FileName)
#Else If B4A
Dim jo As JavaObject
jo.InitializeStatic("anywheresoftware.b4a.objects.streams.File")
If jo.GetField("virtualAssetsFolder") = Null Then
Return "file:///android_asset/" & FileName.ToLowerCase
Else
Return "file://" & File.Combine(jo.GetField("virtualAssetsFolder"), _
jo.RunMethod("getUnpackedVirtualAssetFile", Array As Object(FileName)))
End If
#Else If B4i
Return $"file://${File.Combine(File.DirAssets, FileName)}"$
#End If
End Sub