vb.net - 逗号、')' 或预期的有效表达式继续

Question

出色地。还是习惯了。

我需要为学校创建一个转换温度等的程序。我有：

• 摄氏度
• 开尔文
• 情怀
• 还有华氏

基本上当我写到文本框时，就像我输入 4 摄氏度，我的程序必须显示并将 4 摄氏度转换为所有其他的

我需要非常基本的公式方面的帮助。数学不是最强的，但你能帮帮我吗？

txtkelvin.Text = FormatNumber(Val(txtcelsius.Text)5.0 / 9.0 * -32)

我在这一行得到一个错误。可能从某个地方丢失了一些“）”，但在哪里？

我应该在哪里找到其他温度公式？开尔文和其他人？

Answer 1

您缺少乘法运算符：

Val(txtcelsius.Text)5.0 

应该：

Val(txtcelsius.Text) * 5.0 

话虽如此，您的公式并不完全正确。您很可能想要：

txtkelvin.Text = FormatNumber(Val(txtcelsius.Text) + 273.15) ' celsius to kelvin

或者：

txtkelvin.Text = FormatNumber(((Val(txtFahrenheit .Text) - 32) * 5.0 / 9.0) + 273.15) ' fahrenheit to kelvin

Answer 2

您可以使用该TypedUnits库-> http://www.codeproject.com/Articles/611731/Working-with-Units-and-Amounts

该库包含管理/转换单位（如摄氏度）所需的所有内容。

一个例子：

     Dim Conversion As TypedUnits.Amount = _
         TypedUnits.UnitManager.ConvertTo(New TypedUnits.Amount( _
                                          2, _
                                          StandardUnits.TimeUnits.Minute), _
                                          StandardUnits.TimeUnits.Second)

     MsgBox(Conversion.Value & " Seconds")  Result: 120 Seconds


     Dim unit As TypedUnits.Amount = _
         New TypedUnits.Amount(1, StandardUnits.LengthUnits.KiloMeter)

     MsgBox(unit.Unit.Factor)  Result: 1000