'**Declare**'
Sub Globals
Dim wve As WebViewExtras
Dim jsi As DefaultJavascriptInterface
End Sub
'**Initialize**'
wve.Initialize(webview)
jsi.Initialize
wve.AddJavascriptInterface(jsi,"B4A")
'**Add click event listener**'
Sub webview_PageFinished (Url As String)
wve.ExecuteJavascript("document.body.addEventListener('click', event => {B4A.CallSub('DOMClicked',true, event.target)})")
End Sub
'**On clicking on any element in the webview you will get the element code here**''
Sub DOMClicked(element As String)
log(element)
End Sub