VB时间控件问题

时间：2014.08.06 发布人：eowooi4jyjj
VB时间控件问题

已解决问题

谷歌eowooi4jyjj用户在2014.08.06提交了关于“魔域VB时间控件问题”的提问，欢迎大家涌跃发表自己的观点。目前共有1个回答，最后更新于2024-08-31T06:51:51。怎么利用时间控件画一个移去的圆呢？关键是怎么让时间控件生效，设计方案自定，请高手答疑。希望大家能够帮助她。

详细问题描述及疑问：怎么利用时间控件画一个移去的圆呢？关键是怎么让时间控件生效，设计方案自定，请高手答疑。期待您的答案，希望你能感受到,我最真诚的谢意 ！

希望以下的回答，能够帮助你。

第1个回答

用户名：haoboy88  

'一个计时器控件，timer1.interval=500（若为0,则timer控件失效）
'Dim问答cx,cy,r,lasbiilean写在通用过程里，l=true时，表示圆在窗体的左爆反之在右边
PrivateSubForm_Load()
cx=500'圆心坐标X的初值为500
cy=1000'圆心坐标Y的初值为1000
r=500
Circle(cx,cy),r

EndSub

Pri绝vateSubTimer1_Timer()
Cls
cx=cx+500
Ifcx>=Form1.ScaleWidth-500Thenl=False
Cls
cx=Form1.ScaleWidth-500
cx=剂声木较杆计真造鲁cx-500
Circle(cx,cy),r
End权特电总到径班Sub