Red de conocimiento informático - Aprendizaje de código fuente - Búsqueda multipunto y valoración del color en el área de objetos del botón

Búsqueda multipunto y valoración del color en el área de objetos del botón

Color.FindMutiColorEx(0,0,1024,768, "D2CABF", "1|1|D2CABF,3|5|D2CABF,3|6|D2CABF",1,0)

//Múltiple Haga clic para encontrar el color B

ZB = InStr(XY,"|")

X = Clng(Left(XY, ZB - 1)) : Y = Clng(Right(XY , Len(XY) - ZB))

Si X > 0 e Y > 0 entonces

Llamar a B

Finalizar si

Sub A

Clic izquierdo 1

Fin Sub

Sub b

Clic derecho 1

Fin del sub.