作者namejoshua (燁)
看板Visual_Basic
標題[VB6 ] 用timer畫圓
時間Sun Dec 14 22:40:16 2008
我想試著用timer來一次跑一弧度
然後360秒後跑出一個圓(360個點)
程式碼如下
Private Sub Timer1_Timer()
Form1.Scale (-15, 15)-(15, -15) <--這行只是想讓圓心在form的中央
pai = 3.1415
Static a As Integer
a = a + 1
PSet (5 * Cos(a*pai/180), 5 * Sin(a*pai/180))
End Sub
可是跑出來的結果卻只有第一個點出來= =?
可以請高手們幫我看看是哪裡有問題嗎~感謝
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 59.104.34.95
1F：推 UniFish:要在程式最前面宣告a..你TIMER每執行一次..a就被重新宣告 12/14 23:29
2F：→ UniFish:a就每次都被設為0了 12/14 23:29
3F：→ namejoshua:喔喔~原來如此!!太感謝了^^ 12/14 23:44