ÀûÓÃVBÍêÈ«¿ØÖÆÄãµÄ×ÀÃæͼ±ê
WindowsÖеÄ×ÀÃæͼ±êµÄÅÅÁз½Ê½ÊÇ·ñÈÃÄã¸Ðµ½Ñá¾ë¶øÏë°´ÕÕ×Ô¼ºµÄÏë·¨ÅÅÁÐͼ±ê¡£ÊÇ·ñÏë¸Ä±ä×ÀÃæͼ±êÎÄ×ֵı³¾°¶ø²»
ʹÔÚͼ±êÎÄ×ÖϳöÏÖÒ»¸ö¸öÄÑ¿´µÄÉ«¿é¡£ÕâÀïÎÒÒª½éÉÜÈçºÎͨ¹ýVBÀ´¶Ô×ÀÃæµÄͼ±ê½øÐг¹µ×µÄ¸Ä±ä¡£
ÆäʵÔÚWindowsϵÄ×ÀÃæÒÔ¼°ÈÎÎñÀ¸µÈ¶¼ÊÇ´°¿Ú¶ÔÏó£¬ÎÒÃÇ¿ÉÒÔÀûÓÃWindows APIº¯ÊýFindWindowºÍFindWindowExÀ´»ñµÃ
ËüÃǵľä±ú£¬È»ºóÔÙµ÷ÓÃÆäËüÏàÓ¦µÄAPIº¯ÊýÀ´¿ØÖÆËüÃÇ¡£¶ø·ÅÖÃ×ÀÃæͼ±êµÄ´°¿ÚÊÇÒ»¸öListView¶ÔÏó£¬ÀûÓÃSendMessageº¯Êý
Ïò¸Ã´°¿Ú·¢ËÍÏàÓ¦µÄÏûÏ¢£¬¾Í¿ÉÒÔ¶Ôͼ±ê½øÐÐÐÞ¸ÄÁË¡£ÏÂÃæÊǾßÌåµÄ³ÌÐòʵÏÖ¡£
Ê×ÏÈÔÚVBÖн¨Á¢Ò»¸öÐµĹ¤³Ì£¬ÔÚForm1ÖмÓÈëÈý¸öCommandButton¿Ø¼þ£¬È»ºóÔÚForm1µÄ´úÂë´°¿ÚÖмÓÈëÒÔÏ´úÂ룺
Option Explicit
Private Type POINTAPI
x As Long
y As Long
End Type
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" _
(ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Declare Function FindWindowEx Lib "user32" Alias "FindWindowExA" _
(ByVal hWnd1 As Long, ByVal hWnd2 As Long, ByVal lpsz1 As String, _
ByVal lpsz2 As String) As Long
Private Declare Function UpdateWindow Lib "user32" (ByVal hwnd As Long) As Long
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal _
hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As Long) _
As Long
Private Declare Function SendMessageP Lib "user32" Alias "SendMessageA" (ByVal _
hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) _
As Long
Private Declare Function GetSysColor Lib "user32" (ByVal nIndex As Long) As Long
Private Declare Function SetSysColors Lib "user32" (ByVal nChanges As Long, _
 
Ïà¹ØÎĵµ£º
×òÌìÏÂÎçÎÒºÍСÅÖ±»Ã×ÀÏʦ´«»½µ½ÊÐҽԺȥ£¬Ã×ÀÏʦÏëÌýÌýËûÖÜÁùÉϵĿζÔÎÒµÄÓ°ÏìÓжà´ó£¬ÎһشðµÄ»ù±¾ÄÚÈݺ͡¶10Äê VB 1¡·ÀïÃæµÄÄÚÈݲ¶à£¬µ«Ã×ÀÏʦ¸Ð¾õºÜ¿Õ¶´£¬¸Ð¾õÎÒÔÚ·º·º¶ø̸£¬ÆäʵÎÒÒ²Óиоõ¡£
ΪÁ˽«Ã×ÀÏʦ˵µÄ×᷽ܽ·¨Ó¦ÓÃÓÚʵ¼ù£¬ÎÒÕâÁ½ÌìÇôúÂë·¢ÏÖMsgBox£¬InputBox£¬PrintµÄÓ÷¨²î²»¶à£¬È»ºó¾Í½«Æä×ܽáÈçÏ£º
......
¹ØÓÚ²ÜʦÐÖÕÒ¹¤×÷£º
ÔÚÕÒ¹¤×÷¹ý³ÌÖУº
1¡¢ ¹Û²ìÁ¦¡£ÃæÊÔʱ¿´¼ûÖÐÄÏÈÚͨµÄºá·ù“×îС»¯ÄãºÍ¿Í»§µÄ¾àÀ룬×î´ó»¯ÄãºÍ¿Í»§µÄÀûÒ攣¬Ë³¶øºÍÃæÊÔ¹ÙÌÖÂÛËûÃǹ«Ë¾µÄÎÄ»¯ºÍÀíÄ»á¶ÔÄãӦƸÓкܴó°ïÖú¡£ÕÒ¹¤×÷ʱµÄ±ÊÊÔ»ù´¡¶¼²î²»¶à£¬ÖØÒªµÄÊǺÍÀÏ×ܵÄÃæÊÔ£¬¹«Ë¾¸ü×¢ÖصÄÊÇÄãÊÇÈçºÎ×öÈ˵ĺÍÄã¶ÔÒµÎñµÄÀí½â¡£ËùÒÔ£¬ÔÚÒÔºó ......
µÚÒ»´ÎÕýʽȥÉÏÃ×ÀÏʦµÄ¿Î£¬Õâ´ÎÊǺ®¼ÙÀ´ºóµÄµÚÒ»½Ú¿Î£¬ÄÚÈÝÖ÷ÒªÊǽ»Á÷һϺ®¼ÙµÄѧϰÇé¿ö¡£
Ê×ÏÈÊÇÑÔÐÐÎÊÌ⣺ȥ»ú·¿ÉÏ¿Îʱ£¬´øÐØÅÆ¡¢±Ê¼Ç±¾¡¢±Ê¡¢¡¶Visual Basic ³ÌÐòÉè¼Æ¡·¡¢Ð¬Ìס¢ÑÛ¾µ£¬ÊÖ»úÄܲ»´ø¾Í²»´ø£»±ðÈË·¢ÑÔʱ£¬ÏÔʾÆ÷¹Øµô£¬ÃæÏò¶Ô·½ÒÔʾ×ð¾´¡£
......
Êýѧº¯Êý£ºÖ÷ÒªÓÃÀ´Íê³ÉÊýÖµ¼ÆËã¡£
£¨1£©abs£¨X£©£º¾ø¶ÔÖµº¯Êý£¬¼ÆËãXµÄ¾ø¶ÔÖµ£¬XΪһ¸öÊýÖµ±í´ïʽ¡£
£¨2£©sgn£¨X£©£º·ûºÅº¯Êý¡£¸Ãº¯ÊýµÄ¹¦ÄÜÊÇÅжÏXµÄ·ûºÅ¡£µ±X>0ʱ£¬º¯ÊýֵΪ1£»X<0ʱ£¬º¯ÊýֵΪ-1£»X=0ʱ£¬º¯ÊýֵΪ0.
£¨3£©exp£¨x£©£ºÃÝÔËË㺯Êý¡£·µ»ØeµÄX´ÎÃݵÄÖµ£¬·µ»ØֵΪ˫¾«¶ÈÐÍÊýÖµ¡£
£¨4£©log£¨x£©£º× ......
LOFº¯Êý£ºLOF£¨ÎļþºÅ£©--·µ»ØÎļþºÅËù´ú±íÎļþµÄ³¤¶È£¬³¤¶ÈÒÔ×Ö½ÚΪµ¥Î»¡£
LOCº¯Êý£ºLOC£¨ÎļþºÅ£©--·µ»ØÎļþºÅËù´ú±íÎļþµÄ¶ÁдλÖã¬LOCº¯ÊýµÄ·µ»ØֵΪlongÊý¾ÝÀàÐÍ¡£¶ÔÓÚËæ»úÎļþ£¬·µ»ØµÄΪÉÏÒ»´Î¶ÔÎļþ½øÐжÁ³ö»òдÈëµÄ¼Ç¼ºÅ£»¶ÔÓÚ¶þ½øÖÆÎļþ£¬·µ»ØµÄΪÉÏÒ»´Î¶Á³ö»òдÈëµÄ×Ö½ÚλÖ㻶ÔÓÚ˳ÐòÎļþ£¬·µ»ØµÄÊÇÎļþµÄµ ......