在vs.net编程中拆分小数

时间:2011-11-28 06:21:30

标签: vb.net visual-studio

我有一个项目,我需要做一些数学计算

例如,如果用户输入了数字6765333

现在我必须分析给定的数字应除以180

我将获得37585.183333333

现在开始出现主要问题

我想将37585.183333333

分开

然后仅将.183333333乘以6

所以我应该1.1

这一切都应该在给出新的动态数字后自动完成

这是在windows应用程序中

希望有人能帮助我吗?

3 个答案:

答案 0 :(得分:1)

尝试,

 decimal no = 6765333m / 180;
 Console.WriteLine(no);
 Console.WriteLine(decimal.Remainder(no, 1) * 6);

VB语法:

 Dim no = 6765333 / 180
 Dim no1=Decimal.Remainder(no, 1) * 6
 Dim no2=Decimal.Round(no1, 1)

答案 1 :(得分:0)

最终解决方案

    Dim i As Double = 6765333
    Dim j As Double = i / 180
    Dim k As Double = j - Math.Floor(j)
    Dim sk As String = CStr(k).Substring(0, 11) ' truncate after 9 decimal digits
    k = CDbl(sk)
    Dim l As Double = Math.Round((k * 6) * 10) / 10 ' round on 1 decimal

答案 2 :(得分:-2)

你可以尝试这个..
decimal val=6765333;
decimal divNum=180;
decima ans= val/divNum;
int intVal = ans;
int decVal = ans-intVal; //Now You Get decVal = .183333333. So you can calculate it.