VB6¦p¦ó­­¨îµe­±½Æ»s¥\¯à(printScreen)?

awen8250

½Ð±Ð¤j®a: «Ü«æ...

¥Ø«e·Q°w¹ï¦U­Ó¨t²Î¨Ó­­¨îµe­±½Æ»s¥\¯à(printScreen)¡A¤]´N¬O»¡:¦³ªº¨t²Î¥i¥HprintScreen¡A¦³ªº¨t²Î¤£¦æ¡A
­«ÂI¬OUSER·|¦P®É¶}±Ò¦h­Ó¨t²Î¦b¹q¸£¤W¡A©Ò¥H¥Î¥H¤Uµ{¦¡¬OµLªk°µ¨ì : ¦³ªº¨t²ÎprintScreen¡A¦³ªº¨t²Î¤£¦æ¡C

Private Declare Function SetWindowsHookEx Lib "user32" Alias "SetWindowsHookExA" _
(ByVal idHook As Long, ByVal lpfn As Long, ByVal hMod As Long, ByVal dwThreadId As Long) As Long

Private Declare Function UnhookWindowsHookEx Lib "user32" (ByVal hHook As Long) As Long

Private Declare Function CallNextHookEx Lib "user32" _
(ByVal hHook As Long, ByVal nCode As Long, ByVal wParam As Long, ByVal lParam As Long) As Long

Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer

Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" _
(Destination As Any, Source As Any, ByVal Length As Long)

½Ð°ÝVB6¸Ó¦p¦ó°µ¨ì?¯à¥Î§PÂ_USER¬O§_«ö¤UprintScreenÁä¨Ó§PÂ_¶Ü?
¦³½d¨Òµ{¦¡¥i°Ñ¦Ò¶Ü?
«ô°UÀ°¦£¡AÁÂÁÂ!