Sub Globals
Dim WebView1 As WebView
End Sub
Sub Activity_Create(FirstTime As Boolean)
Activity.LoadLayout("1")
WebView1.LoadUrl("http://www.b4x.com")
End Sub
Sub Activity_Click
Log(FindAll(WebView1, "Basic4android"))
End Sub
Sub FindAll (w As WebView, s As String) As Int
Dim r As Reflector
r.Target = w
Return r.RunMethod2("findAll", s, "java.lang.String")
End Sub