Problema de captura de pantalla de vb6 100 puntos
Para ser honesto, si usas el asistente de botones para hacer esta función, puedo darte el programa del asistente de inmediato, pero es más difícil hacerlo con VB. Te ayudo en un sitio web de programación. en Taiwán. Revisaste un artículo que puede cumplir con tus requisitos. ¡Espero que te sea útil! La siguiente es la información tradicional y simplificada:
Primero apague el software antivirus, porque la mayoría de ellos bloqueará el asistente de claves como si fuera un virus.
'Primero descargue el sexto versión del asistente de claves, principalmente para hacer referencia a las funciones en el asistente de claves QMDispatch.dll
'Después de descomprimir, copie todos los archivos .dll en el directorio a C:\WINNT\system32
'Inicie la ejecución e ingrese regsvr32 C:\WINNT\system32\QMDispatch.dll
'Luego vaya a Proyecto > Establecer proyecto de referencia en VB
' Escriba el siguiente código de programa y pon la imagen que estás buscando en d: \El nombre del archivo es icon.bmp
'Las coordenadas se mostrarán cuando las encuentres, completas
'Lo ejecuté exitosamente bajo vb6 sp6 sin problema
Opción explícita
p>Función de declaración privada FindPic Lib "QMDispatch" () siempre que
Subcomando privado1_Click()
Atenuar pos mientras
Atenuar QMDispatchObj como objeto
Establecer QMDispatchObj = CreateObject("QMDispatch.QMFunction")
'Parámetros izquierdo, superior, derecho, abajo, encuentre la ruta y la similitud de la imagen
pos = QMDispatchObj.FindPic(0, 0, 1280, 1024, "d:\icon.bmp", 0.9)
MsgBox Int(pos / 8192) 'XLeft
MsgBox pos Mod 8192 'YLeft
End Sub