Do until循环异常：仅首次循环生效问题咨询

核心问题：搞反了Do Until的逻辑 #

Do Until的执行规则是当条件为True时停止循环，和Do While（条件为True时继续循环）完全相反。如果你想让循环在变量 ≤ 目标值时持续执行，直接把变量 ≤ 目标值作为Do Until的条件，会导致循环要么直接不执行，要么执行一次就停——因为第一次判断时条件已经满足，触发终止。

解决步骤 #

• 修正循环条件
  把条件改成「你希望终止循环的触发条件」。比如要循环到变量超过目标值才停，就把条件设为变量 > 目标值：
  错误示例（仅执行一次）：

  Dim count As Integer = 1
  Do
      Console.WriteLine(count)
      count += 1
  Loop Until count <= 3
  

  正确示例：

  Dim count As Integer = 1
  Do
      Console.WriteLine(count)
      count += 1
  Loop Until count > 3
  

  这样会执行到count=4时触发终止，输出1、2、3，符合预期。

• 检查循环变量的更新逻辑
  确保循环体内正确更新了用于判断的变量：

  • 不要漏写变量的递增/递减语句（比如count +=1）
  • 确认更新方向正确（要递增的别写成递减）
    如果变量没变化，第一次循环后条件依然满足，直接终止。

• 排查变量类型精度问题
  如果用了浮点型变量（比如Double），累加/递减时可能出现精度误差，导致≤条件意外触发。这种情况可以：

  • 优先用整数类型替代浮点型
  • 或者用近似判断，比如Math.Abs(当前值 - 目标值) < 0.0001代替直接的≤判断

内容的提问来源于stack exchange，提问作者Saket Yadav