Vídeo recomendado
https://youtu.be/diWPPPhW-9E
https://youtu.be/diWPPPhW-9E
Formatar número na lista do fmrPesquisa
Formatar número na lista do fmrPesquisa
Amigos(as),
Como proceder para configurar a formatação número na lista da fmrPesquisa
Anexo a lista
Como proceder para configurar a formatação número na lista da fmrPesquisa
Anexo a lista
- Anexos
-
- lista.png (66.14 KiB) Exibido 7112 vezes
Editado pela última vez por DuMoraes em Qua Out 10, 2018 4:32 pm, em um total de 1 vez.
- Reinaldo
- Jedi
- Mensagens: 1537
- Registrado em: Sex Ago 01, 2014 4:09 pm
- Localização: Garça - SP / SCS - SP
Re: Formatar número na lista do fmrPesquisa
No "carregamento" do campo (subitem) desejado, efetue a formatação desejada.
Re: Formatar número na lista do fmrPesquisa
Prezados, boa tarde!
Caro DuMoraes, falamos de uma listview ou uma listbox?
Um abraço!
Paulinho Monteiro.
Caro DuMoraes, falamos de uma listview ou uma listbox?
Um abraço!
Paulinho Monteiro.
- Reinaldo
- Jedi
- Mensagens: 1537
- Registrado em: Sex Ago 01, 2014 4:09 pm
- Localização: Garça - SP / SCS - SP
Re: Formatar número na lista do fmrPesquisa
Utilizando seu modelo/exemplo do tópico https://www.tomasvasquez.com.br/forum/v ... f=5&t=6572
Obs.: Esse seu modelo/exemplo utiliza ListBox
Re: Formatar número na lista do fmrPesquisa
Reinaldo, Boa Tarde
Primeiramente obrigado pela ajuda novamente.
Escrevi o código abaixo, porém não sei porque formata apenas 12 linhas do listBox conforme anexo.
For i = 1 To Me.lstLista.ListCount
ValorStr = Format(CDec(Me.lstLista.List(i, 3)), "R$ #,##0.0000")
'Tamanho do Campo definida com 10
Me.lstLista.List(i, 3) = Space(10 - Len(ValorStr)) & ValorStr
ValorStr = Format(CDec(Me.lstLista.List(i, 7)), "0.00%")
'Tamanho do Campo definida com 6
Me.lstLista.List(i, 7) = Space(6 - Len(ValorStr)) & ValorStr
ValorStr = Format(CDec(Me.lstLista.List(i, 8)), "R$ #,##0.0000")
'Tamanho do Campo definida com 10
Me.lstLista.List(i, 8) = Space(10 - Len(ValorStr)) & ValorStr
Next
Primeiramente obrigado pela ajuda novamente.
Escrevi o código abaixo, porém não sei porque formata apenas 12 linhas do listBox conforme anexo.
For i = 1 To Me.lstLista.ListCount
ValorStr = Format(CDec(Me.lstLista.List(i, 3)), "R$ #,##0.0000")
'Tamanho do Campo definida com 10
Me.lstLista.List(i, 3) = Space(10 - Len(ValorStr)) & ValorStr
ValorStr = Format(CDec(Me.lstLista.List(i, 7)), "0.00%")
'Tamanho do Campo definida com 6
Me.lstLista.List(i, 7) = Space(6 - Len(ValorStr)) & ValorStr
ValorStr = Format(CDec(Me.lstLista.List(i, 8)), "R$ #,##0.0000")
'Tamanho do Campo definida com 10
Me.lstLista.List(i, 8) = Space(10 - Len(ValorStr)) & ValorStr
Next
Re: Formatar número na lista do fmrPesquisa
Não entendo porque apenas 17 registros ficam formatados. Conforme lista anexa
Re: Formatar número na lista do fmrPesquisa
O anexo. Quando gero a pesquisa apenas 17 registros assumem a configuração de formatação do número.
- Anexos
-
- lista.png (66.14 KiB) Exibido 7078 vezes