PC.Initialize
Panel1.Initialize("Panel1")
'Panel1.AddView(ListView1, 0dip, 0dip,100%x, 83%y)
Panel1.Color = Colors.Red
ScrollView1.Initialize(600dip)
'Activity.AddView(ScrollView1, 0, 0, 100%x, 100%y)
ScrollView1.Panel.AddView(Panel1, 0, 0, 100%x, 600dip)
PC.AddPage(ScrollView1, "Prueba1")
Panel2.Initialize("Panel2")
'Panel2.AddView(ListView2, 0dip, 0dip,100%x, 83%y)
Panel2.Color = Colors.Blue'Colors.RGB(Rnd(0,256), Rnd(0,256), Rnd(0,256))
ScrollView2.Initialize(600dip)
'Activity.AddView(ScrollView1, 0, 0, 100%x, 100%y)
ScrollView2.Panel.AddView(Panel2, 0, 0, 100%x, 600dip)
PC.AddPage(ScrollView2, "Prueba2")
VP.PageContainer = PC
Dim Ac As AppCompat
TabLayout.Color = Ac.GetThemeAttribute("colorPrimary")
TabLayout.SetViewPager(VP)