结果不对，麻烦帮我看看

[蜜_Lumia]

VB代码：

Dim W As Double, QE As Double, WTNT As Double
        Dim R1 As Integer, R2 As Integer, R3 As Integer, R4 As Integer
        W = Val(TextBox1.Text)
        QE = Val(TextBox2.Text)
        WTNT = W * QE / 4.52
        R1 = Math.Round(0.961 * WTNT ^ 0.429)
        R2 = Math.Round(4.774 * WTNT ^ 0.332)
        R3 = Math.Round(8.593 * WTNT ^ 0.332)
        R4 = Math.Round(13.2 * WTNT ^ (1 / 3) / (1 + (3175 / WTNT) ^ 2) ^ (1 / 6))
        TextBox3.Text = R1
        TextBox4.Text = R2
        TextBox5.Text = R3
        TextBox6.Text = R4
//   W和QE都是1000时 ，R1=189，R2=284，R3=511，R4=789

换成C#代码：

double W = Convert.ToDouble(this.txtZhaYaoZhiLiang.Text);
            double QE = Convert.ToDouble(this.txtZhaYaoBaoRe.Text);
            int WTNT = Convert.ToInt32(W * QE / 4.52);
            int R1 = Convert.ToInt32(0.961 * Math.Pow(WTNT, 0.429));
            int R2 = Convert.ToInt32(4.774 * Math.Pow(WTNT, 0.332));
            int R3 = Convert.ToInt32(8.593 * Math.Pow(WTNT, 0.332));
            int R4 = Convert.ToInt32(Math.Round(13.2 * Math.Pow(WTNT, 1 / 3) / Math.Pow((1 + Math.Pow((3175 / WTNT), 2)), 1 / 6)));

            this.txtRenYaunSiWang.Text = R1.ToString();
            this.txtRenYuanZhongShang.Text = R2.ToString();
            this.txtRenYuanQingShang.Text = R3.ToString();
            this.txtCaiChanShunShi.Text = R4.ToString();
//W和QE也都是1000时 ，R1=189，R2=284，R3=511，但  R4=13

我想知道问题出在哪了，为什么 R4的值会不一样？？？

上面如果写的不清楚，这个事公式：

[蜜_Lumia]

怎么没人啊

[蜜_Lumia]

UP

[Hide1984]

C#代码修改一下

double temp = Math.Pow(WTNT,1/3.0);

你直接写1/3的话系统当作int型计算，结果就不是0.3333333~~~而是0了。。。。。

[Hide1984]

1/3和1/6两处都要修改

1/3.0 和 1/6.0

[Jelly_tracy]

牛

[蜜_Lumia]

[Quote=引用 3 楼 hide1984 的回复:]
C#代码修改一下
C# codedouble temp= Math.Pow(WTNT,1/3.0);

你直接写1/3的话系统当作int型计算，结果就不是0.3333333~~~而是0了。。。。。


[/Quote]

呵呵，谢谢你，问题解决了