将图片转换成带坐标的RGB代码

可以...不过你确定？
用VB写个程序可以很简单的解决你的问题，不过得到的文本文件可能会是几个G！
以下是代码：
窗体：
Dim lj As String
Dim ys(2) As Integer
Private Sub Command1_Click()
Open App.Path & "\图片像素级说明文件.txt" For Append As #1
For X = 0 To Picture1.Width
For Y = 0 To Picture1.Height
rgbColor = Picture1.Point(X, Y)
ys(0) = GetRValue(rgbColor)
ys(1) = GetGValue(rgbColor)
ys(2) = GetBValue(rgbColor)
Print #1, "X:" & X & " " & "Y:" & Y & " " & "RGB:" & ys(0) & " " & ys(1) & " " & ys(2)
Next Y
Next X
Close #1
End Sub

Private Sub Form_Load()
Me.OLEDropMode = 1
Picture1.AutoSize = True
Command1.Caption = "输出图片各像素的RGB值"
End Sub

Private Sub Form_OLEDragDrop(Data As DataObject, Effect As Long, Button As Integer, Shift As Integer, X As Single, Y As Single)
Dim sFileName$
Dim i As Integer