Boa tarde
Estou tentando carregar os dados em caixa de combinação desvinculada, ela carrega os dados corretamente mais esta repetindo os dados, conforme a imagem abaixo:
O código abaixo:
Alguém para me ajudar? Obrigado!
Estou tentando carregar os dados em caixa de combinação desvinculada, ela carrega os dados corretamente mais esta repetindo os dados, conforme a imagem abaixo:
O código abaixo:
- Código:
Private Sub CarregaLista()
Set rs = CurrentDb.OpenRecordset("SELECT Codigo, Descricao, Agencia, Conta FROM tblCadContaCaixa")
Me.cboContaCx = ""
Do While Not rs.EOF
Me.cboContaCx.AddItem rs!Codigo & " - " & rs!Descricao & " - AG.: " & rs!Agencia & " - CONTA: " & rs!Conta
rs.MoveNext
Loop
rs.Close
Set rs = Nothing
End Sub
Alguém para me ajudar? Obrigado!