Red de conocimiento informático - Problemas con los teléfonos móviles - VB busca un color en la pantalla y ejecuta el código si aparece en la pantalla

VB busca un color en la pantalla y ejecuta el código si aparece en la pantalla

Je, quieres hacer pulsaciones de teclas ah

Función de declaración privada GetDC Lib "user32" (ByVal hwnd As Long) Mientras

Función de declaración privada GetPixel Lib "gdi32" (ByVal hdc As Long, ByVal (ByVal hwnd As Long, ByVal hdc As Long) As Long

Función privada FetchColor(ByVal X As Integer, ByVal Y As Integer) As Long 'Función FetchColor

hScreen = GetDC( 0)

FetchColor = GetPixel(hScreen, X, Y)

ReleaseDC 0. hScreen

Función final

Luego en el evento relevante Escribe una sentencia IF en

'XY es la coordenada del color a obtener

Si FetchColor(X, Y) = el color a encontrarEntonces

Finalizar si