From Xojo Documentation
New in 2010r4
A segment of a SegmentedControl.
You access the segments of a SegmentedControl from the control’s Items() property. It requires a parameter that specifies the segment that you want to address. For example, the following code selects all the segments in a loop. For each segment, it uses the Selected property to determine whether the segment is selected.
For i As Integer = SegmentedControl1.Items.Ubound DownTo 0
// get the reference to the segment
Dim s As SegmentedControlItem = SegmentedControl1.Items(i)
// see if the segment was selected
If s.Selected Then
// it is selected so increase this segment in size
s.Width = s.Width + 2
// make sure the segmented control knows to resizes its drawing boundaries or you can get weird effects