[請益] 有關再一點變更顏色的問題
不好意思 又要麻煩大家嚕
Private Sub Image2_MouseDown(Button As Integer, Shift As Integer, X As Single,
Y As Single)
w = 50
h = 50
For m = X To X + w Step 5
For n = Y To Y + h Step 5
PSet (X + Image2.Left, Y + Image2.Top), vbRed
Next
Next
End Sub
我希望再IMAGE2中點一點 能以那點為起始點(左上角)
話出一個50x50正方型的紅色區塊
可是感覺程式跑出來 始終只有那一點才變色
就算我把w h 變成好幾千 還是感覺只有一小點
是哪裡有問題勒?
謝嚕
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 220.132.148.99
推
61.222.155.162 05/24, , 1F
61.222.155.162 05/24, 1F
推
61.222.155.162 05/24, , 2F
61.222.155.162 05/24, 2F
推
220.132.148.99 05/24, , 3F
220.132.148.99 05/24, 3F
Visual_Basic 近期熱門文章
PTT數位生活區 即時熱門文章