Sub dd_SizeChanged
Dim WebView1 As WebView
Dim WebViewExtras1 As WebViewExtras
Dim WebViewSettings1 As WebViewSettings
WebView1.Initialize("WebView1")
WebViewExtras1.addWebChromeClient(WebView1, "WebViewExtras1")
WebViewSettings1.setAllowFileAccess(WebView1,True)
WebViewSettings1.setAppCacheEnabled(WebView1,True)
WebViewSettings1.setDOMStorageEnabled(WebView1,True)
dd.Panel.AddView(WebView1, 0dip, 50dip, dd.Panel.Width, dd.Panel.Height)
WebView1.LoadUrl("file:///android_asset/index.html")
End Sub