Filtrar formulário com checkbox

[pkrx]

Boa noite pessoal, preciso da ajuda de vocês pra algo que parece simples, mas por falta de prática não estou conseguindo fazer.

Tenho um formulário que esta sendo alimentado pelo meu bd, quero filtrar ele quando marco um checkbox.

Por exemplo, tem uma coluna no meu bd que chama "Premium", quero filtrar somente os clientes Premium quando marcar essa checkbox.

Consegui um código que esta funcionando, porém, não atualiza o formulário deixando somente os clientes Premium visíveis.

Private Sub FiltroPremium_AfterUpdate()
If Me.FiltroPremium = -1 Then
   Me.Filter = "Premium = 'Sim'"
   Me.FilterOn = True
Else
   Me.Filter = ""
   Me.FilterOn = False
End If
End Sub

 

Desde já, muito obrigado.

[Alyson Ronnan Martins]

Esta usando SQL para pegar o dados do seu BD?