Apo*_*orv 21 c# vb.net vb6 interop backwards-compatibility
我在VB中有这个代码行:
Dim Sqrt As Double
Sqrt = Radius ^ 2 - (CenterX - X) ^ 2
Run Code Online (Sandbox Code Playgroud)
上面的语句中的参数将传递以下值:
X= -7.3725025845036161 Double
CenterX =0.0 Double
Radius= 8.0 Double
Run Code Online (Sandbox Code Playgroud)
在执行上述语句时,其值Sqrt如下:
Sqrt 9.646205641487505 Double
Run Code Online (Sandbox Code Playgroud)
现在我用Math类写了一个类似的C#逻辑:
double Sqrt = 0;
Sqrt = Math.Pow(Radius, 2) - Math.Pow((CenterX - X), 2);
Run Code Online (Sandbox Code Playgroud)
使用相同的值集,C#代码中的输出为:
Sqrt 9.6462056414874979 double
Run Code Online (Sandbox Code Playgroud)
我需要帮助,因为C#代码中的这个单一更改,我的所有值都受到影响.我能做些什么来获得与*VB*源类似的价值吗?
Dir*_*mar 33
有一个在VB6和.NET双类型之间的精度差.两者都是IEEE 64位双精度类型,但.NET CLR在内部使用80位扩展精度,即您的计算在.NET中更准确.
如果必须向后兼容VB6精度,则可以强制FPU(浮点单元)使用(不太准确)的64位值.这可以使用本机_controlfp_s功能来实现.
下面是一个代码片段,您可以使用它暂时"降级"浮点精度以实现向后兼容性.你可以像这样使用它:
用法
// default floating point precision
using (new FloatingPoint64BitPrecision())
{
// floating-point precision is set to 64 bit
}
// floating-point precision is reset to default
Run Code Online (Sandbox Code Playgroud)
代码片段
/// <summary>
/// This class changes floating-point precision to 64 bit
/// </summary>
internal class FloatingPoint64BitPrecision : IDisposable
{
private readonly bool _resetRequired;
public FloatingPoint64BitPrecision()
{
int fpFlags;
var errno = SafeNativeMethods._controlfp_s(out fpFlags, 0, 0);
if (errno != 0)
{
throw new Win32Exception(
errno, "Unable to retrieve floating-point control flag.");
}
if ((fpFlags & SafeNativeMethods._MCW_PC) != SafeNativeMethods._PC_64)
{
Trace.WriteLine("Change floating-point precision to 64 bit");
errno = SafeNativeMethods._controlfp_s(
out fpFlags, SafeNativeMethods._PC_64, SafeNativeMethods._MCW_PC);
if (errno != 0)
{
throw new Win32Exception(
errno, "Unable to change floating-point precision to 64 bit.");
}
_resetRequired = true;
}
}
public void Dispose()
{
if (_resetRequired)
{
Trace.WriteLine("Resetting floating-point precision to default");
SafeNativeMethods._fpreset();
}
}
}
internal static class SafeNativeMethods
{
[DllImport("msvcr120.dll")]
public static extern void _fpreset();
[DllImport("msvcr120.dll", CallingConvention = CallingConvention.Cdecl)]
public static extern int _controlfp_s(
out int currentControl, int newControl, int mask);
public static int _CW_DEFAULT =
(_RC_NEAR | _PC_53 | _EM_INVALID | _EM_ZERODIVIDE | _EM_OVERFLOW
| _EM_UNDERFLOW | _EM_INEXACT | _EM_DENORMAL);
public const int _MCW_EM = 0x0008001f; // interrupt Exception Masks
public const int _EM_INEXACT = 0x00000001; // inexact (precision)
public const int _EM_UNDERFLOW = 0x00000002; // underflow
public const int _EM_OVERFLOW = 0x00000004; // overflow
public const int _EM_ZERODIVIDE = 0x00000008; // zero divide
public const int _EM_INVALID = 0x00000010; // invalid
public const int _EM_DENORMAL = 0x00080000; // denormal exception mask
// (_control87 only)
public const int _MCW_RC = 0x00000300; // Rounding Control
public const int _RC_NEAR = 0x00000000; // near
public const int _RC_DOWN = 0x00000100; // down
public const int _RC_UP = 0x00000200; // up
public const int _RC_CHOP = 0x00000300; // chop
public const int _MCW_PC = 0x00030000; // Precision Control
public const int _PC_64 = 0x00000000; // 64 bits
public const int _PC_53 = 0x00010000; // 53 bits
public const int _PC_24 = 0x00020000; // 24 bits
public const int _MCW_IC = 0x00040000; // Infinity Control
public const int _IC_AFFINE = 0x00040000; // affine
public const int _IC_PROJECTIVE = 0x00000000; // projective
}
Run Code Online (Sandbox Code Playgroud)
小智 5
无需使用Math类,只需以这种方式编写微积分:
sqrt = Radius * Radius - (CenterX - x) * (CenterX - x);
Run Code Online (Sandbox Code Playgroud)
| 归档时间: |
|
| 查看次数: |
1240 次 |
| 最近记录: |