Como alterar um valor de um combo?

Estou reforçando meu aprendizado em access e tenho a seguinte dúvida:
Estou com um form que há 8 componentes: Três Caixas de texto (TXTQTE, TXTVUNIT e TXTTOTAL), uma Caixa de combinações (CBXLISTAFRUTAS) e Uma caixa de listagem (LSTLISTATOTAL) todos desacoplados e dois botões (CMDADDFRUTA e CMDDELFRUTA)
A sequência de preenchimento é a seguinte ao carregar do form é preenchido a caixa de listagem com todas as frutas exemplo :mamão, abacaxi, pera, etc
quando clico no CMDADDFRUTA é adicionado na caixa de listagem a descrição da fruta a descrição da fruta a qte o valor unitário e o valor total (qte x valor unitario)
Até o preenchimento de todos os itens via VBA está tudo correto
mas quando eu clico na lista (LSTLISTATOTAL) para selecionar uma fruta para excluir a única coisa que não conseguir fazer foi alterar o texto da caixa de combinação mas o resto eu consegui...


bom tentei os seguintes procedimentos no evento click do LSTLISTATOTAL :
OBS: A minha caixa de listagem possui 2 colunas código e nome da fruta
1 - CBXLISTAFRUTAS.Text = LSTLISTATOTAL.column(2) OBS.: minha Caixa de listagem tem 5 colunas e a que se refere ao nome da fruta é a coluna número 2
2 - CBXLISTAFRUTAS.value = LSTLISTATOTAL.column(2)
3 - CBXLISTAFRUTAS.Column(1) = LSTLISTATOTAL.column(2)

Nenhum desses deu certo.
Desde já agradeço a todos que puderem ajudar

Boa noite, e bem-vindo ao fórum
Disponibilize pequeno exemplo significativo

Boas...um pitaco.

Experimente no comando de excluir.

me.nomesuacombo.requery

Conforme o pedido do amigo Alexandre Neves estou anexando o Arquivo

Boa noite,
Está a misturar a dúvida das frutas com a dúvida do relatório?
Não entendi o que pretende fazer e quer que aconteça na bd das frutas
Dê todos os detalhes: o que faço, o que devia acontecer e não acontece, ...

Caro Alexandre Neves Desculpe pela segunda dúvida (eu pensei que estava editando um novo post...)
mas tenho 2 dúvidas separadas
1 - É a questão do combo do sistema da frutas no anexo frutas.zip adicionei um png com o detalhamento do que estou com dúvida.
2 - Como montar relatórios via vba (poderá ser qualquer relatório eu apenas citei um exemplo clássico de listagem de clientes).
Obrigado por me alertar sobre tópicos diferentes no mesmo post irei ser mais atento no futuro.

Boa tarde,

Código:

    If LSTLISTATOTAL.ListCount > 1 Then
        Fruta_Selecionada = LSTLISTATOTAL.ListIndex
        TXTVUNIT = LSTLISTATOTAL.Column(2)
        TXTQTE = LSTLISTATOTAL.Column(3)
        vlParcial = LSTLISTATOTAL.Column(4)
        TXTTOTAL = vlParcial
        CBXLISTAFRUTAS.Value = LSTLISTATOTAL.Column(0)
    End If


Nomeie de forma normalizada, fica visual mais leve e leitura mais intuitiva
LSTLISTATOTAL->LstListaTotal
TXTVUNIT->TxtVUnit
TXTQTE->TxtQte
TXTTOTAL->TxtTotal
CBXLISTAFRUTAS->CbxListaFrutas