TabStrip1.LoadLayout("Page1", 1)
TabStrip1.LoadLayout("Page2", "aaa" & CRLF & "bbb")
TabStrip1.LoadLayout("Page3", 3)
Dim lbl As Label = GetAllTabLabels(TabStrip1).Get(1) 'second tab in this example
lbl.SingleLine = False
And if you want to add a little flair to the tabstrip label with csbuilder, use this:
B4X:
tsProfile.LoadLayout("Layout6", "")
.....
Dim lbl As Label = GetAllTabLabels(TabStrip1).Get(1) '2nd tab in your example
lbl.SingleLine = False
Dim cs As CSBuilder=lbl
cs.Initialize.Size(16).Typeface(Typeface.MONOSPACE).Color(Colors.Red)
cs.Append("DOCUMENTATION").Pop.append(CRLF).color(Colors.Blue).Append("ACCOUNTS").PopAll
lbl.Text=cs
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.