Webrowser app.

Sub Globals
   Dim WebView1 As WebView
   WebView1.Initialize("WebView1")
End Sub
Sub Activity_Create(FirstTime As Boolean)
   Activity.AddView(WebView1, 0, 0, Activity.Width, Activity.Height)
   WebView1.LoadUrl("http://www.google.com")
End Sub

Dim MyWebView As WebView
Dim btnwebview As Button

btnwebview.Initialize("btnWebView")
MyWebView.Initialize("")

Activity.AddView(MyWebView,0,50%y,100%x,50%y)
Activity.AddView(btnwebview,0,45%y,50%x,60dip)

Sub btnWebView_Click
   MyWebView.LoadUrl("http://www.Basic4Android.com")
End Sub

Sub Globals
Dim MyWebView As WebView
Dim btnwebview As Button

btnwebview.Initialize("btnWebView")
MyWebView.Initialize("")
End Sub
Sub Activity_Create(FirstTime As Boolean)
Activity.AddView(MyWebView,0,0,Activity.Width, Activity.Height-85)
Activity.AddView(btnwebview,0,Activity.Height-80,Activity.Width,85)
btnwebview.Text="Home"
    MyWebView.LoadUrl("http://google.com")
End Sub

Sub btnWebView_Click
    MyWebView.LoadUrl("http://www.Basic4Android.com")
End Sub

Sub Globals
Dim MyWebView AsWebView
Dim btnwebview AsButton

End Sub


Sub Activity_Create(FirstTime AsBoolean)

btnwebview.Initialize("btnWebView")
MyWebView.Initialize("")

Activity.AddView(MyWebView,0dip,0dip,100%x, 100%y-90dip)
Activity.AddView(btnwebview,25%x,100%y-87dip, 50%x, 85dip)
btnwebview.Text="Home"
MyWebView.LoadUrl("http://google.com")
End Sub

Sub btnWebView_Click
MyWebView.LoadUrl("http://www.Basic4Android.com")
End Sub