Error en armado de cadena de selección.

Les explico lo que quiero hacer:

Tengo una tabla a la cual me pidieron que le agregue el campo Sexo (Femenino, Masculino)... Como ya tenía la base de datos sin ese campo, lo que tenía hecho y edité es que, si no tiene nada en el campo, que en el comboBox me aparezca la palabra "Seleccionar"... Pero no me funciona y no sé qué más hacer...

Pego el código y lo que quiero hacer con referencia a si no está ese campo completo...

RstAfiliados.Open "select * from AFILIADOS", Base, adOpenStatic, adLockOptimistic

With frmModificaAfiliados
.txtAfiliado(0) = RstBuscaAfiliado!ApeyNomAfiliado
.DTPFNac = RstBuscaAfiliado!FNacAfiliado

'Acá es donde quiero hacer que, si no está completo ese campo, entonces que me deje la palabra seleccionar (que es la que aparece por defecto n el control)
If RstBuscaAfiliado!Sexo = " " Then
CmbSexo.Text = "Seleccionar"
Else
.CmbSexo.Text = RstBuscaAfiliado!Sexo & ""
End If
.CmbTipoDoc = RstBuscaAfiliado!TipoDoc
.txtAfiliado(1) = RstBuscaAfiliado!NumDoc & " "
.DTPFInsc = RstBuscaAfiliado!Alta
.CmbAgenteRetencion.Text = RstBuscaAfiliado!AgenteRetencion & " "
End With

Espero me puedan ayudar!

MUCHAS GRACIAS!