在循环里面加 Delay 5//延时5毫秒
这两个循环,程序结构不复杂的话 效率差不多厄,复杂性是同阶的.
如果想增加效率的话,把所有的x,a,b换成数字。因为读取变量需要时间比直接给出一个数大。不过这些都可以忽略不计的。
//例子:用鼠标画一个圆
Sub 画圆
r=300:x0=512:y0=384:x=0:y=0:n=0
While n<3.1415926*2
x=x0+r*cos(n)
y=y0-r*sin(n)
MoveTo x y
Delay 5
n=n+0.03
EndWhile
Return 画圆