version 6.50 1 Form2 Form1 238 268 1 WebBrowser.dll 1 WebBrowser.dll 1 web:WebBrowser 0 Sub designer addform(Form2,"Form2","",220,220,220)@ addbutton(form2,btnBack,70,30,75,23,"Back",212,208,200,0,0,0,True,True,9)@ addform(Form1,"Form1","",220,220,220)@ addbutton(form1,back,130,20,75,23,"back",212,208,200,0,0,0,True,True,9)@ addbutton(form1,btnForm2,40,20,75,23,"Form2",212,208,200,0,0,0,True,True,9)@ End Sub @EndOfDesignText@ Sub Globals 'Declare the global variables here. End Sub Sub App_Start Form1.Show web.New1("Form1",10,60,220,250) End Sub Sub btnForm2_Click Form2.Show End Sub Sub Form2_MouseDown (x,y) btnBack.Visible=False End Sub Sub Form2_MouseUp (x,y) btnBack.Visible=True End Sub Sub btnBack_Click Form2.Close End Sub Sub Form1_MouseDown (x,y) btnForm2.Visible=False back.Visible=False End Sub Sub Form1_MouseUp (x,y) btnForm2.Visible=True back.Visible=True End Sub Sub back_Click web.GoBack End Sub