我用的是VB编程如何让下面的程序往复循环

[复制链接]
查看11 | 回复2 | 2011-5-11 07:48:55 | 显示全部楼层 |阅读模式
Cls
If0=iAndi180Then
Circle(-31.31,-25.1),17.9,vbRed,0,-pi*(0VScroll2.Valuei)/180,1
i=i1
EndIf
Ifi=180Andj180Then
j=j1
Circle(-31.31,-25.1),17.9,vbGreen,0,-pipi*(VScroll2.Valuej)/180,1
EndIf
回复

使用道具 举报

千问 | 2011-5-11 07:48:55 | 显示全部楼层
while(1)
……(你的代码)
wend
(或者while(true)也行)









<h4class=\"ask\">追问


你的QQ是多少?我让你看看我的设计,加上之后是死循环。而没有出现我预期的结果!
回复

使用道具 举报

千问 | 2011-5-11 07:48:55 | 显示全部楼层
先说说你预期的效果是什么
从你贴出来的代码看,似乎是要在屏幕某个固定的位置画一段弧线,这段弧线的张角靠VScroll来控制。如果是这样的话,就不用循环。把这段程序放到Vscroll控件的Change和Scrol事件中就行了。
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行