vb.net格式編號2010

Question

使用此代碼格式化我的文本框。

Public Function TextFormat(ByVal sString As String) As String 
     Dim num1 As Decimal 
     Try 
      num1 = Convert.ToDecimal(sString) 
      TextFormat = FormatNumber(num1, 2) 
      Return TextFormat 
     Catch 
      TextFormat = sString 
     End Try 
    End Function 

-the問題是其四捨五入I輸入數.. 樣品

textbox.text = 「5999.99」 它顯示 「6000.00」 我怎樣才能禁用自動四捨五入數。或者是否有任何其他代碼來格式化文本？ 「###，###，###。##。」 < <那它應該是

感謝

Answer 1

嘗試使用這樣的：

Dim number = Math.Truncate(CInt(textbox.text) * 1000)/1000; 

textbox.text = number.toString 

Answer 2

使用的ToString相反FormatNumber。

Public Function TextFormat(ByVal sString As String) As String 
    Dim num1 As Decimal 
    If Double.TryParse(sString, num1) Then 
     Return num1.ToString("G") ' or ToString("F2") or ToString("0.00") 
    Else 
     Return sString 
    End If 
End Function