Skip to content

Code Error

Viewing 7 posts - 1 through 7 (of 7 total)
  • Author
    Posts
  • October 22, 2006 at 6:54 pm #190970
    ii Rocky ii
    Member

    what is problem in this code

    Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)Pivate Const KEYEVENTF_KEYUP = &H2
Private Const VK_F9 = &H78

Private Sub Command1_Click()
Call keybd_event(VK_F9, 0, 0, 0)
End Sub

Private Sub Command2_Click()
Call keybd_event(VK_F9, 0, KEYEVENTF_KEYUP, 0)
end Sub

     

    October 22, 2006 at 8:11 pm #190976
    Newbie
    Member

    @ii Rocky ii wrote:

    what is problem in this code 

    Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)Pivate Const KEYEVENTF_KEYUP = &H2
Private Const VK_F9 = &H78

    should be

    Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)

Private Const KEYEVENTF_KEYUP = &H2
Private Const VK_F9 = &H78

     

    October 22, 2006 at 8:30 pm #190975
    ii Rocky ii
    Member

    thx mistake is pivate

    October 23, 2006 at 9:13 am #190974
    BattleStar-Galactica
    Member

    double posting should be killed 😆

    October 23, 2006 at 1:44 pm #190973
    Admin
    Administrator

    i second that^

    @nanomachine007 wrote:

    double posting should be killed 😆

    November 20, 2006 at 5:42 pm #190972
    Sabotage2
    Member

    why double posting willbee killed 😯

    November 20, 2006 at 6:17 pm #190971
    Admin
    Administrator

    its a leeched code from planet-source-code.com

    @ii Rocky ii wrote:

    what is problem in this code

        Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)Pivate Const KEYEVENTF_KEYUP = &H2
    Private Const VK_F9 = &H78

Private Sub Command1_Click()
Call keybd_event(VK_F9, 0, 0, 0)
End Sub

Private Sub Command2_Click()
Call keybd_event(VK_F9, 0, KEYEVENTF_KEYUP, 0)
end Sub

     

  • Author
    Posts

Related

Viewing 7 posts - 1 through 7 (of 7 total)
  • You must be logged in to reply to this topic.