VB½Ø»ñWindowsÏûÏ¢µÄ¹³×Ó
±¾ÎÄÒý×Ô¡£¸ÐлԴ´£¡http://useway.blog.51cto.com/736087/176913
VBÎÞËù²»ÄÜÖ®Èý£ºVB½Ø»ñWindowsÏûÏ¢µÄ¹³×Ó
——×÷ÕߣºÖÓÉù
²©¿ÍµØÖ·£ºhttp://useway.blog.51cto.com
VBÒ»Ö±±»ÈÏΪÊÇÒ»¸ö¿ÉÒÔͨ¹ý¼òµ¥µÄ·½·¨£¬Íê³ÉWindows½çÃæÓ¦ÓóÌÐòµÄÒ»¸öÓïÑÔ¡£¶ÔWindowsϵͳ·½ÃæµÄ±à³ÌËƺõÊ×ÏÈÏëµ½µÄ¾ø¶Ô²»ÊÇVB£¬¶ø´ó²¿·Ö³ÌÐòÔ±Ïëµ½µÄÒ»¶¨ÊÇVC¡£ÎÒÃǽñÌì¾Í½éÉÜÒ»ÖÖÓÃVB½Ø»ñWindowsÈ«¾ÖÏûÏ¢µÄ·½·¨¡£
Ò»¡¢WindowsÈ«¾ÖÏûÏ¢½éÉÜ
ÎÒ²»Ï²»¶Ó÷dz£»ÞɬµÄÓïÑÔÀ´½éÉÜÒ»¸ö¼òµ¥µÄÊÂÎÒò´Ë£¬ÎÒÏëÔÚ±¾ÆªÎÄÕÂÖоÍÓÃͨË×µÄÓïÑÔÀ´½âÊÍÕâ¸ö¸ÅÄî°É¡£
ʲôÊÇWindowsÈ«¾ÖÏûÏ¢ÄØ£¿
ÀýÈ磺Êó±êÔÚ×Ô¶¨ÒåµÄ´°¿ÚÖÐÒƶ¯µÄλÖã¬ÎÒÃÇ¿ÉÒÔͨ¹ýÕâ¸öFormÖеÄÏà¹Ø·½·¨»ñÈ¡£¬È»¶ø£¬Èç¹ûÊó±ê²¢Ã»ÓÐÔÚ×Ô¼ºµÄFormÖÐÒƶ¯ÓÖ¸ÃÔõô»ñµÃÆäλÖÃÄØ£¿
ÔÙÀýÈ磺¼üÅ̵ÄÇû÷¶¯×÷£¬ÔÚ±ðµÄµØ·½Çû÷¼üÅÌ£¬²¢Ã»ÓÐÔÚ×Ô¼ºµÄFormÖÐÇû÷¼üÅÌ£¬Ôõô²ÅÄÜ»ñµÃ°´¼üµÄ¾ßÌå¼üÖµÄØ£¿
¶Ôµ¥Æ¬»úÓÐÁ˽âµÄÅóÓѶ¼ÖªµÀ£¬Êó±êºÍ¼üÅ̵IJÙ×÷¶¼ÊÇÀûÓõÄÊÇ“Öжϔ´¥·¢Ê¼þÀ´Íê³ÉµÄ£¬ÄÇôµ±ÏµÍ³“ÖжϔµÄʱºò£¬¾Í»á·¢³öÏûÏ¢¸ø²Ù×÷ϵͳ£¬¶øÕâЩÏûÏ¢¾ÍÊÇWindowsÈ«¾ÖÏûÏ¢¡£
¶þ¡¢¹³×Ó¼ò½é
¹³×ÓÊÇͨ¹ýÓ¢ÎÄHook·Òë¹ýÀ´µÄ£¬ËùνµÄ¹³×Ó¾ÍÊÇÔÚWindowsÈ«¾ÖÏûÏ¢´«µÝµ½²Ù×÷ϵͳ֮ǰ½øÐнػñ£¬¾¹ý´¦ÀíºóÔÙ´«µÝ¸ø²Ù×÷ϵͳ»òÕßÆäËû¹³×ӵijÌÐò¡£
ÏëÏë¿´£¬¹³×ÓÌýÆðÀ´Ïñʲô³ÌÐò£¿
¶Ôû´í£¬ºÚ¿Í³ÌÐò£¬Ä¾Âí³ÌÐò£¬¶¼ÊÇͨ¹ý¹³×ӵķ½·¨»ñÈ¡Êó±ê¼üÅ̵ÄÏàÓ¦²Ù×÷ÐÅÏ¢£¬»¹»ñÈ¡ÃÜÂë»òÆäËûÓÐÓÃÐÅÏ¢µÄ¡£
µ«ÊÇ£¬¹³×ÓÆä±¾Éí²¢²»ÊDz¡¶¾£¬¶øÊÇÌṩ¸øÎÒÃdzÌÐòÔ±Ò»ÖÖ»ñÈ¡²Ù×÷ϵͳ¶¯×÷µÄÒ»¸ö·½·¨£¬Õâ¸ö·½·¨ÓÐʱºò·Ç³£ÓÐÓ㬿ÉÒԷdz£·½±ãµÄ¿ª·¢Õë¶Ô²Ù×÷ϵͳµÄÓÅÖʳÌÐò¡£
Èý¡¢ÏûÏ¢ÖÖÀà
1¡¢WH_CALLWNDPROCºÍWH_CALLWNDPROCRET
ÕâÁ½ÖÖÏûÏ¢ÊÇ·¢Ë͵½´°¿Ú¹ý³ÌµÄÏûÏ¢£¬ÏµÍ³ÔÚÏûÏ¢·¢Ë͵½½ÓÊÕ´°¿Ú¹ý³Ì֮ǰµ÷ÓÃWH_CALLWNDPROC£¬²¢ÇÒÔÚ´°¿Ú¹ý³Ì´¦ÀíÍêÏûÏ¢Ö®ºóµ÷ÓÃWH_CALLWNDPRO ¡£
2¡¢WH_CBT
ËüÊǼ¤
Ïà¹ØÎĵµ£º
Ò»°ã»áʹÓÃWINDOW APIµÄÇé¿ö£¬ÊµÔÚÊÇÒòΪVB±¾Éí²»ÌṩijЩ¹¦ÄÜ£¬µ«ÊÇ£¬³ÌʽËù
ÐèÓÖ²»µÃ²»È»£¬ÀýÈ磺¶ÁÈ¡RegistryÄÚµÄ×Ê
ÁÏ£¬VBÖ»ÌṩSaveSetting¡¢Getsetting µÈ
ϵÁеÄÖ¸Áµ«ÊÇËüÖ»ÄܶÁÈ¡Ìض¨µØÇøµÄÖµ£¬Òª¶Á¡¢É¾¡¢¸ü¶¯ÆäËûÇøÓòµÄֵʱ£¬¾ÍÎÞ
·¨
ʹÓá£ÔÙÈ磺×Ðϸ¿´Ò»¿´Combo BoxµÄEvents£¬ÆäÖÐ ......
1. ¸÷ÖÖ½øÖÆת»»º¯Êý Ò»°ãµÄÊý¾Ý½øÖÆ°üÀ¨Ê®½øÖÆ,¶þ½øÖÆ,Ê®Áù½øÖÆ.Ê®½øÖƾÍÊÇÎÒÃÇÈÕ³£Éú»îÓõ½µÄÊý¾Ý½øÖÆ,Òò´ËÒ²ÊÇÎÒÃÇ×îÊìϤºÍÇå³þµÄ;¶þ½øÖÆÊǼÆËã»úµÄ»ù´¡½øÖÆ,Ö÷ÒªÊÇÒòΪ±ãÓÚÓÃÎïÀíÆ÷¼þʵÏÖ¶þ½øÖÆ;°Ë½øÖƺÍÊ®Áù½øÖÆÒòΪºÍ¶þ½øÖƵÄÌìÈ»µÄÇ×ÃܹØϵ,²¢ÇÒ±íʾ±È¶þ½øÖƸü·½±ã,
¡¡¡¡1.
¸÷ÖÖ½øÖÆת»»º¯Êý
¡¡¡ ......
Try
Dim Path As String = Server.MapPath("~/Download/") 'Îļþ·¾¶
Path = Path & "file.txt" 'ÎļþµÄÃû³Æ
......
ת×Ô£ºhttp://tieba.baidu.com/f?kz=139765011
ÿ¸öº¯Êý¶¼¿ÉÒÔÇ¿Öƽ«Ò»¸ö±í´ïʽת»»³ÉijÖÖÌض¨Êý¾ÝÀàÐÍ¡£
Óï·¨
CBool(expression)
CByte(expression)
CCur(expression)
CDate(expression)
CDbl(expression)
CDec(expression)
CInt(expression)
CLng(expression)
CSng(expression)
CStr(expression) ......