我需要在vb.net中舍入一个值

时间:2009-08-20 21:20:25

标签: vb.net math

我正在制定一个债务计算程序'我的问题是,当我必须计算偿还债务的月份时,它达到28.04而且我必须得到它才能得到29可以帮助我。 提前谢谢

我的代码如下:

    Dim b, SubMtP As Integer
    Dim outsUm, si

    outsUm = TextBox1.Text

    SubMtP = Format(Val(TextBox1.Text) / Val(TextBox2.Text), "0.00")
    Math.Round(SubMtP + 1)
    TextBox5.Text = Format(Val(TextBox4.Text) / 12, "0.00")

    For i As Integer = 1 To SubMtP

3 个答案:

答案 0 :(得分:5)

使用Math.Ceiling

答案 1 :(得分:2)

正如Pavel在评论中所说,你需要分配结果,你应该使用Ceiling

Dim result As Double = Math.Ceiling(SubMtP)

您也强烈鼓励在代码中的任何位置切换Option Strict On以启用严格的静态类型检查。这将导致上述代码中的一些编译错误需要清理。这是,因为这些代码片段是您代码中的潜在错误,并且难以维护和理解。

答案 2 :(得分:1)

该行

Math.Round(SubMtP + 1)

不做任何事情(没有副作用),因为你没有分配或以其他方式使用结果。

如果你想从28.04到29,那么你可能想要Math.Ceiling。很难说你想要做什么,但你可能想要

SubMtP = Math.Ceiling(SubMtP);