VB 中如何输出一个图片所有黑色点的坐标呢？ 我哪地方做错了？
图片是512*512的

Picture1.ScaleMode = 3
Dim x As Single
Dim y As Single
For x = 1 To 512
For y = 1 To 512
If Picture1.Point(x, y) = &H0 Then
Open "c:\11.csv" For Append As #1
Write #1, x, y, " "
Close


End If
Next
Next
MsgBox "end"


[解决办法]
你不是已经做出来了吗
[解决办法]
你确定图片中黑色点都是&h0？如&h101010看起来也似黑色。严格的说，必须先将图片灰度化，然后二值化（0,255）再对点进行判断