故障解除回路
嗨,我在应用程序中的循环中遇到问题。
情况是这样的:
我正在acad中进行计算,从访问中的记录集中获取一些数字。
全局内容应该是这样的:
“计算”
当 X
当 X > Y 打印文本时,值就足够了。
我现在拥有的代码看起来像这样。
我认为它有一些大缺陷...有人可以帮我吗?
会很棒
Do Until rstobj.EOF
While Me.TextBox4.Value > Me.TextBox5.Value
rstobj.MoveNext
Loop
If Me.TextBox4.Value Me.TextBox5.Value则
'在此处进行计算
rstobj.MoveNext
ElseIFMe.TextBox4.Value
MsgBox"计算确定"
rsobj.MoveLast
Else
'Me.TextBox4.Value=Me.TextBox5.Value
结束如果
循环
页:
[1]