Vb.net .NET大于/小于不工作

我遇到了“大于/小于”比较不起作用的问题

以下是正在发生的事情：

假设我有一个正方形，我得到这个正方形在空间中的最小点和最大点，比如minPoint=（0,0,0）和maxPoint=（1,1,1）

我把文字放在这个面上，但我需要文字在正方形面内，如果不是这样，我就缩小尺寸，直到合适为止

这是我的代码，它正确地计算了minPt到maxPt的距离，以及minPt到文本位置的距离

以下是我的代码行，但它不起作用：

---

如果sizeYPt浮点数学不精确，则需要进行“足够接近”检查。比如说，如果使用SizeYPt-SizeY，是否可以发布代码的其余部分？事实上，这不是一个有效的循环。总而言之，sizeXPt的结果小于sizeX，但仍然没有返回true@niallmcfc我的代码的其余部分不需要查看：P对于双值可能是一个“问题”，也许这会有所帮助：浮点数学是不精确的，你们需要一个“足够接近”的检查。比如说，使用SizeYPt-SizeY@HansPassant，这就是解决方案！非常感谢您，请回答此问题，以便您获得学分。：）

Dim sizeY, sizeX, sizeYPt, sizeXPt As Double
Dim yVect, xVect As New VISIVector

yVect.Put(0, 1, 0)
xVect.Put(1, 0, 0)

sizeY = Util.dist2pts_alongAxis(centerPoint, p2, yVect)
sizeYPt = Util.dist2pts_alongAxis(centerPoint, txtPt, yVect)
sizeX = Util.dist2pts_alongAxis(p1, p2, xVect)
sizeXPt = Util.dist2pts_alongAxis(p1, txtPt, xVect)

If sizeY.ToString.Contains("-") Then sizeY = sizeY * -1
If sizeYPt.ToString.Contains("-") Then sizeYPt = sizeYPt * -1
If sizeX.ToString.Contains("-") Then sizeX = sizeX * -1
If sizeXPt.ToString.Contains("-") Then sizeXPt = sizeXPt * -1

MsgBox(sizeYPt & " | " & sizeY & vbNewLine & sizeXPt & " | " & sizeX)

If sizeYPt <= sizeY And sizeXPt <= sizeX Then Exit Do