Hopefully this would solve your problem:
Private Sub ComboBox1_SelectionChangeCommitted(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged
Me.myBindingSource.Filter = "<<DisplayMember>> = '" & ComboBox1.Text & "'"
End Sub