[Resolvido]Capturar valor de uma caixa de listagem baseado na tabela

Galera, boa noite!
Sabe aquela que a gente escolhe um campo da tabela, clica na parte inferior, na aba "pesquisa", criamos uma caixa de listagem com uma determinada lista de valores?
Então, eu fiz isso, só que estou com um problema para capturar o valor que o usuário selecionou.
Por exemplo: eu criei uma multi seleção, daí eu fiz com que apareca num formulário. Até aí, tudo bem, só que a cada registro eu preciso saber qual valor o usuário selecionou. então criei um recordset que percorre do inicio ao fim para ler registro a registro, porém, se eu colocar:
"ds!NomeDoCampoQueTemCxDeListagem", e perguntar se é nulo (isnull(no do campo)), se o usuário não marcar nada dá certo, porém, se em algum registro ele marcou alguma coisa e em outro não, informa que não é nulo (e eu sei que em algum registro o usuário não marcou nada), mas não consigo captura o valor. Se eu colocar debug.print ds!nome do campo, dá um erro tipos incompatíveis.
Alguem pode me ajudar, estou quebrando a cabeça a horas e sem sucesso!

Olá Edson,

Tente usar da forma abaixo, verificando se o tamanho é diferente de 0, algo assim:

Código:

len(ds!NomeDoCampoQueTemCxDeListagem &"") <> 0

A concatenação é para quando for null não dar erro, teste.

Abraço

Alvaro meu amigo, desculpe a demora.
Mais, infelizmente, não funcionou
deu "Tipos incompatíveis" erro 13

Outra coisa, eu queria também capturar o valor, caso o usuário selecionou algum item

Olá Edson,

Talvez seja melhor partilhar base de dados com a parte envolvida na questão de forma a podermos testar.

Abraço

Se usar a função interna NZ para tratamento dos nulos, não resolve ?

Código:

Nz(NomeDoCampoQueTemCxDeListagem,"")

Ou se nulo devolver um zero ?

Código:

Nz(NomeDoCampoQueTemCxDeListagem,0)

Pessoal, criei um banco simples, como exemplo, com uma tabela e um campo.
a pergunta é: como capturar o valor deste campo, ou seja o que o usuário marcou, em um formulário ou um recordset?

Galera, consegui,
Pra quem interessar, segue o código

Capturar o(s) valor(es) de um campo, listbox, multiseleção de uma tabela

Chama-se, como campo multivalorado ou campo de múltiplos valores
Option Compare Database
Option Explicit
Sub Campo_Multivalorado()
  Dim Ds As Recordset
  Dim CampoFilho As Recordset
   
  'Abre um Recordset para a tabela Tb_Teste.
  Set Ds = CurrentDb.OpenRecordset("Tb_Teste")
  Ds.MoveFirst
   
  Do Until Ds.EOF
     'Abre um conjunto de registros para o campo de valores múltiplos.
     Set CampoFilho = Ds!teste.Value

        'Sai do loop se o campo com vários valores não contiver registros.
        Do Until CampoFilho.EOF
            CampoFilho.MoveFirst
                   
            'Percorre os registros no conjunto de registros filho.
            Do Until CampoFilho.EOF
                 'Imprime o(s) valores
                Debug.Print CampoFilho!Value.Value
                CampoFilho.MoveNext
            Loop
        Loop
     Ds.MoveNext
  Loop
End Sub

Fonte: learn.microsoft.com/pt-br/office/vba/access/concepts/data-access-objects/manipulate-multivalued-fields-with-dao