CASAS DECIMAIS EM LABEL
Montei a rotina para soma de valores de uma coluna no listview, por exemplo tem 2 registros: [ô]50,00[ô] + [ô]26,60[ô] era para mostrar [ô]R$ 76,60[ô] porém aparece [ô]76,6[ô].
Qual código uso para que apareça as duas casas decimais depois da vÃrgula, se for nº quebrado ele mostra, só não mostra quando termina com [ô]0[ô]...
A rotina que monta isto é:
Private Sub RotinaSomarRsAgendamentos()
Dim i As Long
Dim valor As Double
For i = 1 To Me.lvwLista.ListItems.Count
valor = valor + CDbl(Me.lvwLista.ListItems(i).ListSubItems(7))
Next i
lblSomaRsAgendamentos.Caption = [Ô]R$ [Ô] & valor
End Sub
Alguma sugestão?
Qual código uso para que apareça as duas casas decimais depois da vÃrgula, se for nº quebrado ele mostra, só não mostra quando termina com [ô]0[ô]...
A rotina que monta isto é:
Private Sub RotinaSomarRsAgendamentos()
Dim i As Long
Dim valor As Double
For i = 1 To Me.lvwLista.ListItems.Count
valor = valor + CDbl(Me.lvwLista.ListItems(i).ListSubItems(7))
Next i
lblSomaRsAgendamentos.Caption = [Ô]R$ [Ô] & valor
End Sub
Alguma sugestão?
textBox.Text = string.Format([Ô]{0:N2}[Ô], variavel)
social.msdn.microsoft.com/Forums/pt-BR/47ad9386-9dfc-4a46-910b-aed3a4643e95/numero-com-casas-decimais-no-vbnet?forum=clientept
Experimente usar:
lblSomaRsAgendamentos.Caption = [Ô]R$ [Ô] & Format(CDbl(valor, [Ô]##0.00[Ô]))
lblSomaRsAgendamentos.Caption = [Ô]R$ [Ô] & Format(CDbl(valor, [Ô]##0.00[Ô]))
lblSomaRsAgendamentos.Caption =FormatNumber(valor,2)
A dica do PERCIFILHO deu erro conforme o anexo.
A dica do KURTGU não adaptei pois é um campo label.
Deu certo com a dica do NILSONTRES.
Muito obrigado pessoal.
A dica do KURTGU não adaptei pois é um campo label.
Deu certo com a dica do NILSONTRES.
Muito obrigado pessoal.
Tópico encerrado , respostas não são mais permitidas