Dim it As New RadSliderItem
With it
.Value = row.Item("ROUTESEGMENT_GUID").ToString()
.Text = row.Item("ROUTESEGMENT_ORIGINDATE").ToString()
End With
sli.Items.Add(it)
Next
This will bind the radslider item values and text
If you then need to set the value of the radslider to one of the existing radslideritems use this :
If Not sli.Items.FindItemByValue(routesegmentid) Is Nothing Then
sli.Value = sli.Items.FindItemByValue(routesegmentid).Index
End If