Checkbox no me funciona

Amigos

Me he estado quebrando la cabeza para programar para una bd en Access 2003,
una búsqueda mediante checkboxes, sin embargo, no he tenido éxito. Me han
facilitado un código que, sin embargo, no me funciona como les indico más
adelante.

Tengo un formulario y en el Header form están los unbound checkboxes y un
botón para activar la búsqueda. La sección Detail tiene las cajas de texto
que muestra los registros encontrados en la búsqueda al marcar uno o varios
checkboxes.

Este es el código

Option Compare Database
Option Explicit

Private Sub bFiltrar_Click()
Dim strTmp As String
Dim lngLen As Long
Dim strWhere As Integer

strTmp = ""
If Me.chkBD.Value Then
strTmp = "'BDs',"
End If

If Me.chkBE.Value Then
strTmp = strTmp & "'BES',"
End If

If Me.chkCON.Value Then
strTmp = strTmp & "'CONS',"
End If

lngLen = Len(strTmp) - 1
If lngLen > 0 Then
strWhere = "TemsID IN (" & Left$(strTmp, lngLen) & ") AND "
End If
End Sub

La variable strWhere es la que no he podido declarar, he usado string, long,
integer, Boolean, byte y no me funciona.

“TemsID, se refiere a un campo numérico

Además estas son las referencias que tengo en Access y desconozco si falta
alguna
Visual Basic For Applications
Microsoft Access 11.0 Object Library
OLE Automation
Microsoft DAO 3.6 Object Library
Microsoft ActiveX Data Objects 2.5 Library

Me pueden ayudar con este problema o bien indicarme si lo que necesito hacer
(buscar mediante checkboxes) no se puede hacer en la forma que necesito.

Muchas gracias