VBÉú³ÉµÄÁ½¸ö.exeÓ¦ÓóÌÐò
³ÌÐòÒ»ÉÏÃæ²ÉÓÃÒÔÏ·½·¨À´ÊµÏÖ´°¿ÚÖö¥
VB code:
Private Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long
Private Const a& = -1
Private Const b& = &H1
Private Const c& = &H2
Private Sub Form_Load()
Me.Move 0, 0, Screen.Width, Screen.Height
End Sub
³ÌÐò¶þÉÏÃæÒ²²ÉÓÃͬÑùµÄ·½·¨À´ÊµÏÖ´°¿ÚÖö¥
µ«µ±³ÌÐòÒ»ºÍ¶þͬʱÔËÐÐʱ£¬Ö»ÓÐÔËÐеĵڶþ¸ö³ÌÐòÄÜʵÏÖÖö¥¡£
ÎÒÏëÈÃÁ½¸ö³ÌÐò¶¼ÊµÏÖÖö¥£¬¸ÃÔõôд£¿
ÎÒÒ²Ôø°ÑPrivate Const a& Öµ¸Ä³É-2 ÊÔ¹ý£¬µ«»¹ÊDz»ÐС£¡£¡£
Ö»ÄÜÓÐÒ»¸ö¡£
¿ÉÒÔ½«Ò»¸öÖö¥ÁËÖ®ºóÔÙ½«ÁíÒ»¸öÖö¥,µ«ÊDz»¿ÉÄÜÁ½¸öͬʱÖö¥.
²»ÄÜ¡£
´°¿Ú´ÎÐò ZOrder Ö»ÓÐÒ»¸ö¶ÓÁУ¬²»¿ÉÄÜ´æÔÚ²¢ÅÅ¡£
ÇëÎʶþÂ¥£¬ÈçºÎ½«Ò»¸öÖö¥ÁËÖ®ºóÔÙ½«ÁíÒ»¸öÖö¥ÄØ£¿
ÎÒµÄÒªÇóÊÇ£¬Ê×ÏÈÔËÐгÌÐòÒ»£¬ËüÊÇ´¦ÓÚÖö¥×´Ì¬µÄ£»ÔÙÔËÐгÌÐò¶þ£¬Õâʱ³ÌÐò¶þ´¦ÓÚ³ÌÐòÒ»µÄÉÏÃæ£»µ«ËüÃǶÔÓÚÆäËü³ÌÐòÊÇ´¦ÓÚÖö¥×´Ì¬µÄ¡£¡£¡£
Äã²»ÊÇÓиöSetWindowPosÂð,ÔÙÓøöFindWindow ¾Í¿ÉÒÔÁË
Private Sub Form_Load()
Call SetWindowPos(Me.hwnd, -1, 0, 0, 0, 0, 3)
End Sub
ÇëÎÊÎåÂ¥£¬ÓÃFindWindowÖö¥£¬Ôõôд£¿
FindWindowÊÇÓÃÀ´ÕÒµ½´°Ìå¾ä±ú,È»ºó½«Õâ¸ö¾ä±ú´«ÈëSetWindowPosµÄ²ÎÊýÀï
VBżѧµÃ²»´í£¬ÏÖÔÚ´óÒ»£¬¸ßÈýµÄʱºò¾ÍѧVBÁË£¬ÏÖÔÚѧУÀï¶¼ÊÇѧC#ºÍVB.NETµÄÐֵܶࡣ¡£¡£
żҪתÐÐVB.NETÁË~µ±ÄêѧVBѧÁË2Ä꣬¶ÔVBÀïÃæµÄ³£Óú¯Êý¶¼Ê®·ÖÁ˽⡣
Select¡¢If½á¹¹¡¢For NextÑ»·¡¢µÈ¶¼Á˽⡣¡£¡£ ......
ÔÚvbÕâ±à³ÌÀïËÆºõÓкܶàµÄ¶«Î÷ÊÇÏàÁªÏµµÄ£¬ÎªÊ²Ã´ÓÐЩÈ˶ÔvbµÄ±à³ÌÃþ²»µ½Í·ÄÔ°¡£¡²¢ÇÒÓÐЩʺÜÈÝÒ׵쬵«ÊÇÈ´°ÑËüÃǵĴúÂë±ä³É¸´ÔÓ£¬Ò²È¥ÏëһЩ²»ÄÜʵÏֵĶ«Î÷°¡£¡
û·ÖÁË£¬Â¥Ö÷¶àÀ´µã·Ö£¡
À´½Óµã·Ö
......
ÎÒÊÇVBµÄгÉÔ±£¬ÏÖÔÚÏëÓÃVBÀ´×ö¸öTXTÎĵµ£¬Çë´ó¼Ò¸øÎÒ´úÂë¼°½éÉÜÒ»ÏÂÏàÓ¦µÄ¿Ø¼þ£¡
·Ç³£¸Ðл£¡£¡£¡£¡£¡£¡
¿ÉÒÔÓÃһЩOFFICE¿Ø¼þ
googleÉÏÕÒһϰÉ,VBдÈëTXT,ºÜ¶àÑùÀý´úÂëµÄ
Ö±½Óµ÷²éÓþͿÉÒÔÁË
Ãæ¶ÔÃÀÅ® ......