[VB6 ] 用timer畫圓

看板Visual_Basic作者 (燁)時間17年前 (2008/12/14 22:40), 編輯推噓1(102)
留言3則, 2人參與, 最新討論串1/1
我想試著用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

12/14 23:29, , 1F
要在程式最前面宣告a..你TIMER每執行一次..a就被重新宣告
12/14 23:29, 1F

12/14 23:29, , 2F
a就每次都被設為0了
12/14 23:29, 2F

12/14 23:44, , 3F
喔喔~原來如此!!太感謝了^^
12/14 23:44, 3F
文章代碼(AID): #19HHhIPX (Visual_Basic)