Protected Sub RadioButtonList_DataBound(ByVal sender As Object, ByVal e As EventArgs)
Dim list As RadioButtonList = DirectCast(sender, RadioButtonList)
Dim blank As ListItem = list.Items.FindByValue("")
If blank IsNot Nothing Then
list.Items.Remove(blank)
End If
End Sub
|