vb.net – 在Visual Basic中舍入一个数字

发布时间：2020-12-17 00:22:18 所属栏目：大数据来源：网络整理

导读：我有一个需要向下舍入数字的Visual Basic应用程序,例如,2.556将变为2.55而不是2.26. 我可以使用一个函数来执行此操作,使用以下方法从小数点开始删除2个以上的字符： Dim TheString As StringTheString = 2.556Dim thelength = Len(TheString)Dim thedecimal

我有一个需要向下舍入数字的Visual Basic应用程序,例如,2.556将变为2.55而不是2.26.

我可以使用一个函数来执行此操作,使用以下方法从小数点开始删除2个以上的字符：

Dim TheString As String
TheString = 2.556
Dim thelength = Len(TheString)
Dim thedecimal = InStr(TheString,".",CompareMethod.Text)
Dim Characters = thelength - (thelength - thedecimal - 2)
_2DPRoundedDown = Left(TheString,Characters)

这样做有更好的功能吗？

您可以使用 Math.Floor执行此操作.但是,您需要乘以* 100并除以,因为您无法提供多个数字

Dim theNumber as Double
theNumber = 2.556
Dim theRounded = Math.Sign(theNumber) * Math.Floor(Math.Abs(theNumber) * 100) / 100.0

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!