none
Duas casas decimais

    Question

  • ola pessoal

    gostaria de saber como faço para aparecer somente duas casas após a virgula em um textbox usando vb.net.

    desde já agradeço.

    Monday, January 29, 2007 11:24 AM

Answers

  • Você pode arredondar:

    Dim d As Decimal = 34664.983748392748
    TextBox1.Text = Math.Round(d, 2).ToString()

    Monday, January 29, 2007 11:39 AM
  • Boa Tarde Leonardo,

    Eu fiz uma classe de funções e formato a variavel com 2 casas decimais com a classe abaixo:

     

    Imports System.Globalization

    Public Class Funcoes

    Public Shared Function Format_Number(ByVal Valor As Decimal)

    '-- Declara Varíaveis utlizadas na função --

    Dim Fvalor As Decimal

    Dim Cultura_Atual As NumberFormatInfo

    Fvalor = Convert.ToDecimal(Valor)

    Cultura_Atual = CType(NumberFormatInfo.CurrentInfo.Clone(), NumberFormatInfo)

    Cultura_Atual.NumberDecimalDigits = 2

    Format_Number = Fvalor.ToString("N", Cultura_Atual)

    End Function

    End Class

    Você poderia melhorar e passar a quantidade de casas decimais por parâmetro...

    Espero ter ajudado.

    Até mais

     

    Monday, January 29, 2007 4:57 PM

All replies

  • Você pode arredondar:

    Dim d As Decimal = 34664.983748392748
    TextBox1.Text = Math.Round(d, 2).ToString()

    Monday, January 29, 2007 11:39 AM
  • Boa Tarde Leonardo,

    Eu fiz uma classe de funções e formato a variavel com 2 casas decimais com a classe abaixo:

     

    Imports System.Globalization

    Public Class Funcoes

    Public Shared Function Format_Number(ByVal Valor As Decimal)

    '-- Declara Varíaveis utlizadas na função --

    Dim Fvalor As Decimal

    Dim Cultura_Atual As NumberFormatInfo

    Fvalor = Convert.ToDecimal(Valor)

    Cultura_Atual = CType(NumberFormatInfo.CurrentInfo.Clone(), NumberFormatInfo)

    Cultura_Atual.NumberDecimalDigits = 2

    Format_Number = Fvalor.ToString("N", Cultura_Atual)

    End Function

    End Class

    Você poderia melhorar e passar a quantidade de casas decimais por parâmetro...

    Espero ter ajudado.

    Até mais

     

    Monday, January 29, 2007 4:57 PM