I have also updated your Telerik points.
Currently, the possible solution that I can suggest is to use the following custom RadListFilterPopup:
Private Sub RadGridView1_FilterPopupRequired(sender As Object, e As Telerik.WinControls.UI.FilterPopupRequiredEventArgs) Handles RadGridView1.FilterPopupRequired If e.Column.Name = "Start" Or e.Column.Name = "End" Then e.FilterPopup = New MyRadListFilterPopup(e.Column, True) End IfEnd SubPublic Class MyRadListFilterPopupInherits RadListFilterPopup Public Sub New(ByVal dataColumn As GridViewDataColumn, ByVal groupedDateValues As Boolean) MyBase.New(dataColumn, groupedDateValues) End Sub Protected Overrides Sub OnButtonOkClick(ByVal e As EventArgs) Dim filterOperator As FilterOperator = FilterOperator.IsEqualTo Dim listFilterElement As IRadListFilterElement = TryCast(GetType(RadListFilterPopup).GetField("listFilterElement", System.Reflection.BindingFlags.Instance Or System.Reflection.BindingFlags.NonPublic).GetValue(Me), IRadListFilterElement) Select Case listFilterElement.SelectedMode Case ListFilterSelectedMode.All filterOperator = FilterOperator.None Case ListFilterSelectedMode.Null filterOperator = FilterOperator.IsNull Case ListFilterSelectedMode.NotNull filterOperator = FilterOperator.IsNotNull End Select If filterOperator <> FilterOperator.IsEqualTo Then SetFilterOperator(filterOperator) Me.ClosePopup(RadPopupCloseReason.CloseCalled) Else Dim compositeFilterDescriptor As CompositeFilterDescriptor = New CompositeFilterDescriptor() compositeFilterDescriptor.PropertyName = MyBase.DataColumn.Name compositeFilterDescriptor.LogicalOperator = FilterLogicalOperator.[Or] For Each entry As DictionaryEntry In listFilterElement.SelectedValues For Each value As Object In CType(entry.Value, ArrayList) Dim descriptor As FilterDescriptor If TypeOf MyBase.DataColumn Is GridViewDateTimeColumn OrElse MyBase.DataColumn.DataType = GetType(DateTime) OrElse MyBase.DataColumn.DataType = GetType(DateTime?) Then descriptor = New DateFilterDescriptor(MyBase.DataColumn.Name, FilterOperator.IsEqualTo, CType(value, DateTime?), False) Else descriptor = New FilterDescriptor(MyBase.DataColumn.Name, FilterOperator.IsEqualTo, value) End If compositeFilterDescriptor.FilterDescriptors.Add(descriptor) Next Next MyBase.FilterDescriptor = compositeFilterDescriptor OnFilterConfirmed() End If End SubEnd Class
I hope this information helps.
Regards,
Dess | Tech Support Engineer, Sr.
Progress Telerik