作者tevil (dd)
看板Visual_Basic
标题[请益] 有关再一点变更颜色的问题
时间Tue May 24 03:14:07 2005
不好意思 又要麻烦大家噜
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
1F：推 fumizuki:变数用错了 61.222.155.162 05/24
2F：推 fumizuki:X 和 Y 改成 M 和 N 61.222.155.162 05/24
3F：推 tevil:= = 再问一个问题 如果我点了一点 那点变红色 220.132.148.99 05/24