Below is the code snippet used in a radgrid usercontrol
Protected Sub FilterCombo_SelectedIndexChanged(ByVal o As Object, ByVal e As RadComboBoxSelectedIndexChangedEventArgs)
Dim filterItem As GridFilteringItem = CType(CType(o, RadComboBox).NamingContainer, GridFilteringItem)
If e.Value = "NoFilter" Then
filterItem.FireCommandEvent("Filter", New Pair("NoFilter", Me.colname))
Else
filterItem.FireCommandEvent("Filter", New Pair("EqualTo", Me.colname))
End If
End Sub
Protected Sub RadGridList_ItemCommand(ByVal sender As Object, ByVal e As Telerik.Web.UI.GridCommandEventArgs) Handles RadGridList.ItemCommand
If
(e.CommandName = RadGrid.FilterCommandName) Then
If (TypeOf e.CommandArgument Is Pair) Then
Dim objpair As Pair = DirectCast(e.CommandArgument, Pair)
RadGridList.MasterTableView.FilterExpression = "([" & objpair.First.ToString & "] = '" & objpair.Second.ToString & "') "
End If
Private Sub RadGridList_PreRender(ByVal sender As Object, ByVal e As System.EventArgs) Handles RadGridList.PreRender
Dim filterExpr As String
RadGridList.Skin = skinType
filterExpr =
"([" & FilterExpression.ToUpper & "] = '" & FilterValue.ToUpper & "') "
If (Not String.IsNullOrEmpty(filterVal) And (Not Page.IsPostBack)) Then
RadGridList.MasterTableView.FilterExpression = filterExpr
RadGridList.MasterTableView.Rebind()
filterExpr =
""
Else
If Not String.IsNullOrEmpty(RadGridList.MasterTableView.FilterExpression.ToString) Then
RadGridList.MasterTableView.FilterExpression = RadGridList.MasterTableView.FilterExpression
End If
RadGridList.MasterTableView.Rebind()
End If

a.lightBox-link { color:Red;}<classes><class name="Lightbox Link" value="a.lightBox-link" /></classes>