[Resolvido]Campo de múltipla escolha com IF dando erro

Prezados,

tenho um campo de múltipla escolha [TOP_formapag]

e quero fazer um condição para quando o usuário selecionar Boleto
mas só da certo quando seleciona APENAS o boleto
Por exemplo: Se selecionar Boleto e Crédito a condição não funciona.

If Me.TOP_formapag.Column(0) = "Boleto" Then


Alguém poderia me ajudar?

up

manda o bd para analise.

grato

Obrigado pelo retorno

A condição tem que ser apenas para o boleto

Quando seleciono na caixa de combinação a opção "boleto", o código funciona corretamento
Mas quando seleciona Boleto e outras opções (na múltipla escolha), o código não atende minha necessidade.

Parece que a caixa de combinação salva o conteúdo assim: "Boleto, transferência, cartão Crédito"

Por isso o código não consegui identificar apenas o boleto isoladamente no conjunto da múltipla escolha

Este condição, If Me.TOP_formapag.Column(0) = "Boleto" , não identifica que a opção "Boleto" Consta na seleção


Esto anexando um exemplo do erro

Olá!

Tentei usar um looping
For Each LinhaSelecionada In Me.forma_pgto.ItemsSelected
mas não sei o motivo ele não executa, costumo usar assim para Caixa de Lsiatgem, nunca usei para Caixas de Combinação.

Resolveu da seguinte maneira:

Código:


Private Sub forma_pgto_AfterUpdate()
    For i = 0 To forma_pgto.ListCount - 1
        If Me.forma_pgto.Column(1, i) = "Boleto" And Me.forma_pgto.Selected(i) Then
            MsgBox "Selecionado boleto" 'Coloca aqui o que deseja que seja realizado
        End If
    Next
End Sub

Coloquei este código no evento "Após atualizar" do controle forma_pgto, mas adapte ao que melhor se adequar ao seu caso.

Muito obrigado pela ajuda thiagomcosta e ronaldojr1

Encontrei uma outra solução

Segue o link!

https://www.maximoaccess.com/t34683-resolvidocondicao-para-campo-com-multipla-escolha#239249

VLww Pessoal!