¹ØÓÚActiveXµÄ½Ì³Ì[vb]£¨×ªÌû£©
¹ØÓÚActiveXµÄ½Ì³Ì
Visual BasicÊÇÃæÏò¶ÔÏóµÄ³ÌÐòÉè¼ÆÓïÑÔ£¬Î¢Èí¹«Ë¾ÍÆ³öÁËActiveX¼¼Êõ£¬ÀûÓÃActiveX¼¼ÊõÌá³öµÄ±ê×¼£¬¶Ô½çÃæµÄÉè¼Æ½øÐÐÁË·â×°£¬ÐγÉÁËһϵÁбà³Ì¿Ø¼þ£¬¼´Ìض¨¹¦ÄܵijÌÐòÄ£¿é¡£ÔÚ³ÌÐòµÄÉè¼ÆÖУ¬Éè¼ÆÈËÔ±Ö»ÐèÒªÍ϶¯ËùÐè¿Ø¼þµ½´°Ì壬Ȼºó¶Ô¿Ø¼þ½øÐÐÊôÐÔÉèÖúÍʹÓÃÆä·½·¨¡¢Ê¼þ¼´¿É£¬´ó´ó¼õÇáÁË·±ËöµÄ³ÌÐòÉè¼Æ¡£
µÚÒ»½Ú ÈÏʶ²¢×°ÔØActiveX¿Ø¼þ
ÈÎÎñ1£ºActiveX¿Ø¼þµÄ¸ÅÄîºÍActiveX¿Ø¼þµÄ×°ÔØ·½·¨
¡¾ÈÎÎñµÄÌá³ö¡¿Visual Basic¹¤¾ßÏäÉϵıê×¼¿Ø¼þÖ»ÓÐ21¸ö¡£¶ÔÓÚ¸´ÔÓµÄÓ¦ÓóÌÐò£¬½ö½öʹÓÃһЩ±ê×¼¿Ø¼þÊDz»¹»µÄ£¬¿ÉÒÔÓ¦ÓÃVisual BasicÒÔ¼°µÚÈý·½¿ª·¢ÉÌÌṩµÄ´óÁ¿AcitveX¿Ø¼þ¡£ÕâЩ¿Ø¼þ¿ÉÒÔÌí¼ÓÔÚ¹¤¾ßÏäÉÏ¡£Ä¿Ç°ÔÚInternetÉÏ´óÔ¼ÓÐ1000¶àÖÖAcitveX¿Ø¼þ¿É¹©ÏÂÔØ£¬´ó´ó½ÚÔ¼ÁËÎÒÃǵĿª·¢Ê±¼ä¡£
±¾ÈÎÎñÖ÷Òª°üÀ¨ÒÔÏÂÄÚÈÝ£º
(1) ¿Ø¼þ·ÖÀ༰ActiveXµÄ¸ÅÄî¡£
(2) ×°ÔØActiveX¿Ø¼þ¡£
11.1.1 ¿Ø¼þ·ÖÀ༰ActiveXµÄ¸ÅÄî
Visual Basic 6.0ÖпؼþÖ÷Òª·ÖΪÈýÖÖ£ºÄÚ²¿¿Ø¼þ£¨±ê×¼¿Ø¼þ£©¡¢ActiveX¿Ø¼þ£¨Íⲿ¿Ø¼þ£©ºÍ¿É²åÈë¶ÔÏó¡£
1£®ÄÚ²¿¿Ø¼þ£¨Ò²³Æ±ê×¼¿Ø¼þ£©
¾ÍÊÇÎÒÃÇͨ³£Ê¹ÓõÄÈç±êÇ©¡¢Îı¾¿ò¡¢ÃüÁî°´Å¥µÈ³£Óÿؼþ£¬ÔÚÎÒÃÇÔËÐÐVisual Basic 6.0»·¾³Ê±£¬¿É×Ô¶¯ÔÚ¹¤¾ßÏäÖгöÏÖ¡£Èçͼ11-1Ëùʾ¡£
ͼ11-1 ¹¤¾ßÏäÖеÄÄÚ²¿¿Ø¼þ
2£®ActiveX¿Ø¼þ
£¨1£©ActiveX²¿¼þ
VB¹¦ÄÜÖ®ËùÒÔÇ¿´ó£¬ºÜ´ó³Ì¶ÈÉÏÊǽèÖúÓÚActiveX²¿¼þ¡£ËùνActiveX²¿¼þÊÇÖ¸Ò»¼þ¿ÉÕдýµÄ´úÂ룬ÈçÒ»¸ö.exe ¡¢.dll»ò .ocxÎļþ£¬ËüÃÇÔÚÌṩ¶ÔÏóʱ×ñÑActiveXµÄ¹æ·¶¡£ÔÚVBÖУ¬¾ßÓÐËÄÖÖÀàÐ͵ÄActiveX²¿¼þ£ºActiveX ¿Ø¼þ¡¢ActiveX.EXE¡¢ActiveX.DLL ¡¢ActiveX Îĵµ¡£ActiveX.EXE²¿¼þÊDz»¿ÉÊӵĴúÂ벿¼þ£¬Äܹ»·þÎñÓÚ¶à¸öÓ¦ÓóÌÐò£¬²¢ÇÒÄܹ»ÔÚÔ¶³Ì¼ÆËã»úÉÏÔËÐУ¬Äܰ²×°ÔÚ·þÎñÆ÷¶Ë£»ActiveX.DLL ²¿¼þÊDz»¿ÉÊӵĴúÂ벿¼þ£¬Äܹ»ÓëÓ¦ÓóÌÐòÔËÐÐÔÚͬһ¸ö½ø³ÌÖУ¬Äܰ²×°ÔÚ¿Í»§¶Ë£»ActiveX ¿Ø¼þÊÇÒ»¸ö¿ÉÊӵIJ¿¼þ£¬Äܹ»×÷Ϊ¿Ø¼þ±»ÍϷŵ½²»Í¬µÄÓ¦ÓóÌÐòÖУ»ActiveX ÎĵµÒ²ÊÇÒ»¸ö¿ÉÊӵIJ¿¼þ£¬Äܹ»Í¨¹ýInternetÉϵÄWebä¯ÀÀÆ÷´ò¿ª¡£
£¨2£©ActiveX¿Ø¼þ
ActiveX¿Ø¼þ³ÆÎªÀ©³ä¿Ø¼þ¡£ActiveX¿Ø¼þÊÇÒ»ÖÖ¾ßÓпÉÊÓÉè¼ÆÍâ¹Û£¬²¢ÇÒÄܹ»×÷Ϊ¿É²å¼þÒýÈëµ½Ó¦ÓóÌÐòÖÐÈ¥µÄActiveX²¿¼þ£¬ÈçADO Data¿Ø¼þ¾ÍÊÇÆäÖÐÖ®Ò»¡£“ActiveX¿Ø¼þ”ÊÇÒ»ÖÖÀ©Õ¹ÃûΪ .OCXµÄ¶ÀÁ¢Îļþ£¬Í¨³£´æ·ÅÔÚWindowsµÄSystemĿ¼ÖС£
´ó²¿·ÖÓ¦ÓóÌÐò¿ÉÒÔÓÃÄÚ²¿¿Ø¼þÀ´Éè¼Æ£¬µ«ÊÇÓÐЩ¹¦ÄÜ£¬È磺¶àýÌå¡¢¶¯»¡¢¼ÆËã»úͨѶµÈÎÞ·¨ÓÃÄÚ²¿¿Ø¼þÀ
Ïà¹ØÎĵµ£º
Õâ¶Îʱ¼äÔÚÒÆÖ²ÏîÄ¿µÄ¹ý³ÌÖУ¬Æð³õÎÒÏëÅжÏÒ»¸ö×Ö·û´®ÖÐÊÇ·ñ´æÔÚij×Ö·û£¨´®£©£¬Ö±½ÓµÄʹÓ÷½·¨ÊÇÓÃinstr£¨start£¬string1£¬string2£¬VB compare£©£¬µ«¾¹ý·ÖÎöÔÚVBÖпÉÒÔÖ»ÓÃһϷ½·¨À´Åжϣ¡
1.³£ÓõÄINStr·½·¨
Function InStr([Start], [String1], [String2], [Compare A ......
VBÏÔʾ͸Ã÷FLASHЧ¹û
ÑÝʾЧ¹û£º
´úÂëÈçÏ£º
¹«¹²ÉùÃ÷ÇøÓò
Option Explicit
Private Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long) As Long
Private Declare Function SetWindowLong Lib "user32" Alias "SetW ......
×÷Õß: ØýÃû, ¡¡³ö´¦:ITר¼ÒÍø,¡¡ÔðÈαà¼: лåûåû,¡¡
2010-04-23 11:20
¡¡¡¡±¾ÎĽéÉÜVB¶Ô³ÌÐòÔËÐÐµÄ¼à¿Ø¡£
¡¡¡¡×ªÑۼ䣬±¾ÏµÁÐÎÄÕÂÒѾдµ½Á˵ÚÁù¸ö£¬½ñÌìдµãÊ²Ã´ÄØ?
¡¡¡¡»¹ÊǵÃд£¬¿´ËÆVB×ö²»µ½µÄÊÂÇ飬ÄÇô½ñÌìÆð¾ÍддVB¶Ô²Ù×÷ϵͳµÄ¿ØÖưɡ£
¡¡¡¡Ê×ÏÈ£¬ËµÒ»Ëµ£¬VB¶ÔÓÚ±»µ÷ÓúóµÄ³ÌÐòµÄ¼à¿Ø·½·¨¡£
¡¡¡¡ÔÐͺ¯Êý¼ò ......
ʹÓÃc#ÓïÑÔÔÚ.netƽ̨Éú³ÉµÄdllÊÇ»ùÓÚMSILµÄ¶þ½øÖÆ´úÂ룬ͨ³£Çé¿öÏÂÊÇÎÞ·¨±»nativeµÄÓïÑԺͳÌÐòµ÷Óõģ¨ÀýÈçvb£¬vc£¬delphi£©¡£µ«ÊÇÒ»°ãÀ´ËµwindowsÉÏnativeµÄ³ÌÐò¶¼ÊÇ¿ÉÒÔÖ±½ÓʹÓÃcom¶ÔÏóµÄ¡£Í¨¹ý.netƽ̨ÌṩµÄһЩ¹¤¾ß£¬¿ÉÒÔΪÆäαÔìÒ»¸öcom½Ó¿Ú²¢×¢²áµ½ÏµÍ³ÖС£´Ëʱ£¬¿ÉÒÔÔÚnativeµÄ³ÌÐòÀͨ¹ýÕâ¸öαcom½Ó¿ÚÀ´ÊµÏÖ´Ë. ......
Ö÷´°Ìå´úÂ룺
'´ò¿ªÍøÒ³
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
'¸´ÖÆÎļþ
Private Declare Fu ......