请高手诊断一下,问题出在哪里?
各位好,这段程序运行时,指针只转一下后,就不动了,而且指针线条变得弯弯扭扭的.麻烦大侠帮我看看我这段代码到底哪里出问题了?谢谢了!开始按扭代码:
Timer1.Enabled=True
Form_Load代码:
Timer1.Enabled=False
Timer1.Interval=1000
Picture1.Scale (-1,1)-(1,-1)
Line1.x1=0 : Line1.y1=0
Line1.x2=0 : Line1.y2=0.7
arph=0
Privale Sub Timer1_Timer()
arph=arph+3.1415926/30
Line1.y2=0.7*cos(arph)
Line1.x2=0.7*sin(arph)
End Sub