>Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged > If Len(Trim(Me.ComboBox1.Text)) > 0 And Trim(Me.ComboBox1.Text) <> "All" Then > > ' If Trim(Me.ComboBox1.Text) <> "All" Then > Me.DsINVAssetsDepreciationLookupBindingSource.Filter = "DepartmentAbbreviation = '" + Me.ComboBox1.Text + "'" > 'Me.INV_AssetsDepreciation_LookupTableAdapter.Fill(DsINV_AssetsDepreciation_Lookup.INV_AssetsDepreciation_Lookup) > Else > 'Me.DsINVAssetsDepreciationLookupBindingSource.Filter = "" > Me.DsINVAssetsDepreciationLookupBindingSource.RemoveFilter() > > > End If > > End Sub >