VB怎么扫描游戏屏幕 做个补血器

就像 按键精灵 里的功能一样

IfColor 117 10 63594a 0
KeyPress 112 1
Delay 15000
EndIf

什么函数 可以 获取 屏幕某一点的坐标 和 颜色呢

GetPixel

谢谢

难不成你连坐标都不知道？

'API函数声明 GetDC 和 GetPixel

Private Sub timer1_timer()
Dim hdc As Long
Dim color As Long
Dim thecolor As Long
Dim x As Long
Dim y As Long

hdc = GetDC(0)
color = GetPixel(hdc, x, y)
If color = thecolor Then

MsgBox "找到啦！！"
End If
End Sub

对的

菜鸟记得6楼的代码不能直接应用……起码x和y要给值

对 游戏 无效
只能对 桌面 窗口 有效
怎么解决

没试过,
说说怎么个无效法.

楼主应该想做某个游戏的外挂吧, 不过这想法倒是第一次听说. 是不是想捕捉游戏屏幕上的血管条. 判断多少在来看是否需要补血? (这样理解没错吧.) 但是大部分游戏外挂,实现这种功能都不是靠捕捉屏幕的. 而是直接读内存血量值的.