Dim pnl0 As B4XView = xui.CreatePanel("")
pnl0.SetLayoutAnimated(0, 0, 0, 100%x, 100%y)
Dim pnl1 As B4XView = xui.CreatePanel("")
pnl1.SetLayoutAnimated(0, 0, 0, 100%x, 100%y)
Root.LoadLayout("LytASTabMenu") 'CustomListView1 con ASTabMenu
pnl0.LoadLayout("LytASViewPager")
CustomListView1.Add(pnl0, "")
TabStrip.Initialize(ASTabMenu1, ASViewPager1)
pnl1.LoadLayout("Layout1")