[VB6 ] 用timer畫圓
我想試著用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
12/14 23:29, 1F
→
12/14 23:29, , 2F
12/14 23:29, 2F
→
12/14 23:44, , 3F
12/14 23:44, 3F