[Resolvido]Formato de telefone em Listbox

Galera,

Tenho uma ListBox que tem como Origem uma consulta. Nessa listbox tenho em uma das colunas números de telefones, e gostaria que esses números ficassem com o formato que defini na máscara de entrada do form.

Gostaria que ficassem (999)+(99) 9999-9999 e não 9999999999999
Já coloquei máscara na tabela, no formulário e consulta, mas sem sucesso...
Estive pesquisando na internet e encontrei alguns tópicos falando sobre a função "Format". No entanto, não consegui implementar nenhuma. Devo estar falhando em alguma parte.


Como fazer isto?

Essa função mesmo que estou tentando utilizar Dilson. Só que devo estar inserindo no lugar errado por falta de conhecimento...

Poderia por gentileza modificar o BD anexo para mim ver onde estou errando?

Aqui:

Boa xará!

Eu estava utilizando a função em uma coluna em branco ao lado direito na consulta...
Devo colocar a função por cima do campo que pretendo formatar. Perfeito!



Muito obrigado pela ajuda!
Abraço.

como fazer essa mascara em uma lis box com mais de coluna

Boa tarde!

Ney Santos, e só incluir mais colunas e incluir o código de "Format".

Boa tarde fiz as alterações e quando abro o formulário as formatações ficam corretas.
porém, quando atualizo a list box  não funciona.
Em anexo estou colocando parte do bd, seria possível verificar e dizer onde errei?

Att

Ney Santos

alguem tem alguma ideia?

Boa tarde!

Ney Santos, O problema no seu exemplo era o código do filtro "No evento (ao alterar) do campo txFiltro.
Como você colocou a consulta para ser feita via código, você tinha que ter alterado o format do campo lá também.

Mais fiz um modelo que na minha opinião e mais simples. e assim você fica tendo mais de uma opção.

Coloquei o critério na consulta da lista, no campo dos nomes.

Código:

Como [Formulários]![LocRazao]![txFiltro].[Texto] & "*"

E coloquei a txFiltro para atualizar a lista.

obrigado vou testar.
Eu ate tentei mudar o format no código mas confesso que não acertava..
a princípio está funcionando desde que eu não aperte o botão limpar pesquisa.
pois quando aperto a pequisa deixa de funcionar.
att

Ney Santos

Boa tarde Ney Santos
O controle de limpar eu não tinha alterado.
Mais basta colocar este código abaixo que irá funcionar.

Código:

Me.txFiltro = ""
Me.Lista.Requery
Me.txFiltro.SetFocus

obrigando funcionou..
Att
Ney Santos

O fórum agradece