WebViewExtra1.Initialize(WebView1)
WebView1.JavaScriptEnabled = True
WebView1.ZoomEnabled = False
WebSettings.setAppCacheEnabled(WebView1,True)
WebSettings.setSavePassword(WebView1,True)
WebSettings.setDOMStorageEnabled(WebView1,True)
Dim WebChromeClient1 As DefaultWebChromeClient
WebChromeClient1.Initialize("WebChromeClient1")
WebViewExtra1.SetWebChromeClient(WebChromeClient1)
WebViewExtra1.addJavascriptInterface(WebView1, "B4A")
WebViewExtra1.JavaScriptEnabled = True
WebView1.LoadUrl("https://app.planisport.com")