Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

vbÖÐÓÃsendmessageÄ£ÄâÊó±êµÄÎÊÌâ

´úÂëÈçÏ£º
SendMessage hwnd, WM_LBUTTONDOWN, 1, &HC00239
SendMessage hwnd, WM_LBUTTONUP, 0, &HC00239

¿ÉÊÇÔÚ´°¿ÚÀïûÓа´ÄãÖ¸¶¨µÄ×ø±êµã»÷£¬¶øÊÇÊó±êÔÚÄÄÀïÔÚÄÄÀïµã»÷²»ÖªµÀÊÇʲôԭÒò°¡¡£

ÓÃspy++²âÊÔÁËÏ£¬×ø±êÊÇÕýÈ·µÄ°¡¡£

µ«ÊÇÓÐÇø±ð£¬Õâ¶ÎÊÇÄ£ÄâµÄ¡£
<00072> 00620674 S WM_LBUTTONDOWN fwKeys:MK_LBUTTON xPos:569 yPos:192
<00073> 00620674 R WM_LBUTTONDOWN
<00074> 00620674 S WM_LBUTTONUP fwKeys:0000 xPos:569 yPos:192
<00075> 00620674 S WM_LBUTTONUP

Õâ¶ÎÊÇÖ±½Óµã»÷´°¿ÚÀïµÃµ½µÄ
<00069> 00620674 P WM_LBUTTONDOWN fwKeys:MK_LBUTTON xPos:569 yPos:192
<00070> 00620674 P WM_LBUTTONUP fwKeys:0000 xPos:569 yPos:192

¾ÍÊÇÄ£ÄâµÄ±ÈÕý³£µã»÷µÄ¶àÁËÄÇôÁ½ÐС£¶øÇÒ²»ÄÜÔÚ´«µÝµÄÖµ´¦µã»÷Êó±ê£¬¶øÊÇÊó±êÔÚÄÄÀï¾Íµã»÷¡£

¼òµ¥µÄ˵¾ÍÊÇÄ£ÄâµÄʱºò´«µÝµÄ×ø±êûÓÐ×÷Óá£

Ë­ÄܰïÎÒ½â´ðϰ¡£¬Ð»Ð»ÁË¡£

1.ʹÓÃAPI GetWindowRect ¿ÉÒÔµÃ֪Ŀ±êµÄXYÓë´óС
2.Ä£ÄâÊó±ê ½¨ÒéÄãʹÓÃmouse_event

Private Type RECT
  Left  As Long
  Top  As Long
  Right  As Long
  Bottom  As Long
End Type
Private Declare Function GetWindowRect Lib "user32" (ByVal hwnd As Long, lpRect As RECT) As Long

Private Sub Command1_Click()
  Dim Rec As RECT
  GetWindowRect HwndVal, Rec


Ïà¹ØÎÊ´ð£º

vbµÄ³É¹¦Ö®Â· - À©³ä»°Ìâ / ¹²ÏíÈí¼þ£¨×ßÏòº£Í⣩

ÔÚvbÕâ±à³ÌÀïËÆºõÓкܶàµÄ¶«Î÷ÊÇÏàÁªÏµµÄ£¬ÎªÊ²Ã´ÓÐЩÈ˶ÔvbµÄ±à³ÌÃþ²»µ½Í·ÄÔ°¡£¡²¢ÇÒÓÐЩʺÜÈÝÒ׵쬵«ÊÇÈ´°ÑËüÃǵĴúÂë±ä³É¸´ÔÓ£¬Ò²È¥ÏëһЩ²»ÄÜʵÏֵĶ«Î÷°¡£¡




û·ÖÁË£¬Â¥Ö÷¶àÀ´µã·Ö£¡

À´½Óµã·Ö

......

VB iniÎļþдÈë ¶ÁÈ¡ - VB / »ù´¡Àà

¿´ÁËһЩVB iniÎļþдÈë¶ÁÈ¡µÄ·½·¨ µ«ÊÇ»¹ÊDz»ÖªµÀÔõôд£¬ÉÏÃæÐ´Á˺ܳ¤ ºÜ¶à£¬µ«ÊÇÎÒ²»ÖªµÀÔõôÓã¬ÎÒÏëÎÊÒ»ÏÂÔõÑùд²ÅÄÜʵÏÖÔÚTEXT1ÖÐд×Ö£¬È»ºóµãCommand1Ìá½»£¬È»ºóTEXT1ÀïÃæµÄÊý×Ö¾Íд½øINIÀïÃæ[Section]µÄKey1 ......

vb Å£Âð - Web ¿ª·¢ / vbScript

vbÊDz»ÊǺÜÅ£°¡ ÔõôÄÇô¶àµÄ²¡¶¾¶¼ÊÇvb×öµÄ°¡ c#Ðв»ÐУ¿
c#ÔÚXPÔËÐв»ÁË£¬³ý·ÇÈñðÈËÏÈ×°ÉÏ.net.
VBÏà¶ÔÓÚC,C++,ASMµÈµÈ£¬¾ÖÏÞÐÔ´ó¶àÁË¡£

±ðÔÙ˵ʲôÓïÑÔ²»ÈçʲôÓïÑԵϰÁË£¬Ö»ÓÐÄã²»»áÓûòÓÃ×Ų»Ë³ÊÖµÄÓ ......

°ïÎҸĸÄÕâVBÌâ - VB / »ù´¡Àà

°ïÎÒ¸Ä¸Ä ÎÒ×ܾõµÃÓÐÎÊÌâ
Type ID
  number As Single
  score As Integer
  name As String * 6
End Type
Dim personl As ID, i%
Private Sub Command1_Click()
 i = 0
&nbs ......

VBÔõÑù»ñµÃÊó±ê´¦µÄ³¬¼¶Á¬½Ó - VB / »ù´¡Àà

VBÔõÑù»ñµÃÊó±ê´¦µÄ³¬¼¶Á¬½ÓÄØ£¿
  ÔÚWebBrowser¿Ø¼þÖÐÓÐÕâÑùÒ»¸öʼþ:StatusTextChange(index As Integer, ByVal Text As String)
  ËüµÄText²ÎÊýÕýÊÇÊó±ê´¦µÄ³¬¼¶Á¬½Ó,µ«ÎÊÌâÊÇÈç¹ûÎÒµÄä¯ÀÀÆ÷Õýà ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ