.....
'This event will be called once, before the page becomes visible.
Private Sub B4XPage_Created (Root1 As B4XView)
Root = Root1
Root.LoadLayout("MainPage")
Page2.Initialize
B4XPages.AddPageAndCreate("Page2", Page2)
B4XPages.GetManager.TransitionAnimationDuration = 0
Page3.Initialize
B4XPages.AddPageAndCreate("Page3", Page3)
B4XPages.GetManager.TransitionAnimationDuration = 0
Dim Page2 As B4XPage2 = B4XPages.GetPage("Page2")
Page2.B4XFloatTextField1.Text = "abc"
Dim Page3 As B4XPage3 = B4XPages.GetPage("Page3")
Page3.B4XFloatTextField1.Text = "xxx"
End Sub
.....