Cómo utilizar el puntero clave para enumerar la lista de puertos serie disponibles en su PC actual (sistema Windows)

Sub FindPic con límite de tiempo y haga clic (X superior izquierda, Y superior izquierda, X inferior derecha, Y inferior derecha, desplazamiento X, desplazamiento Y, ruta, intervalo, nota)

Llame al complemento. Msg.Tips(nota)

Nota TracePrint

Hora de inicio = ahora

Hacer

FindPic TopLeftX, TopLeftY, BottomRightX, BottomRightY, Ruta, 0.9, intX, intY

Si intX gt; 0 e intY gt; 0 ¿entonces?

MoveTo int(intX OffsetX), ?int(intY OffsetY)

Clic izquierdo 1

Salir Hacer

¿De lo contrario?

Finalizar si

TimeDiff = DateDiff("S", hora de inicio, ahora)

TracePrint TimeDiff

Complemento de llamada Retraso 500

Bucle hasta TimeDifferencegt；Intervalo

End Sub