[Hassan Khamees]

اخي زكريا ,آخي Aly لم يعمل اي كود منهم

سأقوم بالتوضيح اكثر ,,

الان البرنامج يعمل بالاسفل واريد ايقاف عملة عند الضغط علي زر F12 يتوقف البرنامج عن العمل

فالهاذا اريد وضع كود الضغط علي زر F12 في التايمر

مثل هذا الكود الذي يعمل علي vb6
اسم التايمر هنا KeyCatch

كود :

Private Sub KeyCatch_Timer()
    If GetAsyncKeyState(vbKeyF12) < 0 Then
        Prev = "12"
    Else
        If Prev = "12" Then
            Call SStop
            Prev = ""
        End If
    End If
End Sub

وشكراً لكم وجعله الله في ميزان حسناتكم ,,