No tengo ningun problema con este codigo, se ejecuta perfecto, pero la cuestion esta es cuando la aplicacin es externa, como podria averiguar la clase y el caption de una plaicacion externa? saludos

Despues de tanto tiempo LO CONSEGUI, jeje, fue muy complicado y sin su ayuda no lo habria conseguido, bueno posteo una parte del code para que se den cuenta:

Private Sub Timer1_Timer()
cont = cont + 1
Label1.Caption = cont
PosX = 70
PosY = 236
l = SetCursorPos(PosX, PosY)
lpRect.Left = 26
lpRect.Top = 216
PosXY = (PosY - lpRect.Top) + (PosX - lpRect.Left)

If cont = 5 Then
pulsar FindCommand(Me.hWnd)
End If

End Sub

Private Function FindCommand(ByVal lHost As Long) As Long
    FindCommand = FindWindowEx(lHost, Picture1.hWnd, "Button", "Iniciar")
End Function

Private Sub pulsar(ByVal hn As Long)

Call mouse_event(MOUSEEVENTF_LEFTDOWN, PosXY, PosXY, 0, 0)
Call mouse_event(MOUSEEVENTF_LEFTUP, PosXY, PosXY, 0, 0)
 
End Sub

No me funcionaron las Call SendMessage que cobein muy amablemente me paso pero con las llamadas del mouse_event todo se soluciono, definitivamente tuve que tirarme casi 11 Horas de leer y comprension porque recibi codigo con el cual nunca habia trabajado, pero bueno ya me enrole,  ,  me demore mucho para que funcionara pero vale la pena.

Gracias a todos por su tiempo, y ahi nos vemos.