¸øVBÔö¼ÓÒ»¸ö¹öÂÖ£¬ÈÃVB±à´úÂëµÄʱºò¸ü·½±ã
VB6IDEMouseWheelAddin.dll
¾ÍÊÇÕâ¸öÄÜʹÄãÔÚVBµÄ´úÂë±à¼´°¿ÚÄܹ»Ê¹ÓÃÊó±ê¹öÂÖ£¬±à¼´úÂë¡¢²é¿´´úÂë¸ü·½±ã¡£
ÏÂÃæÏêÊö£º
1¡¢¸ø´ó¼ÒÒ»¸öÏÂÔØµØÖ·£º
http://download.microsoft.com/download/e/f/b/efb39198-7c59-4ace-a5c4-8f0f88e00d34/vb6mousewheel.exeÓÒ»÷½âѹ£¬ÔÙÓÒ»÷½âѹ£¬Õâʱ¾Í»á¿´µ½Ò»¸ödllÎļþ£¬Õâ¸ö¾ÍÊÇÎÒÃÇÒªµÄdllÎļþ¡£
Èç¹ûÄã¾õµÃÂé·³µÄ»°¿ÉÒÔÖ±½ÓÏÂÔØÕâ¸ödllÎļþ£ºhttp://www.leszj.com/sfw/VB6IDEMouseWheelAddin.dll
2¡¢´ò¿ªÎҵĵçÄÔ→Windows→System32Îļþ¼Ð¡£½«Õâ¸ödllÎļþ¸´ÖÆÕ³Ìù¹ýÈ¥¡£
3¡¢½«Õâ¸ödllÎļþ×¢²á¡£·½·¨Îª£ºµã»÷¿ªÊ¼→ÔËÐУ¬ÊäÈë“regsvr32 ***.dll”£¨ÒýºÅ²»ÓÃÊäÈ룩£¬½«***»»³ÉÕâ¸ödllµÄÎļþÃû£¬Ò²¾ÍÊÇVB6IDEMouseWheelAddin£¬¼´regsvr32 VB6IDEMouseWheelAddin.dll¡£µã»÷È·¶¨£¬ÕâÑù¾ÍÍê³ÉÁË×¢²á¡£
4¡¢Èç¹ûÄãÏÖÔÚÕý´ò¿ªÒ»¸öVB±à¼Æ÷£¬°ÑËü±£´æÒ»Ï¹صô¡£ÖØÐ´ò¿ªVB£¬ÕâÑùËû²ÅÄÜÖØÐ¼ÓÔØÐ¼ÓÈëµÄdllÎļþ¡£²Ëµ¥“Íâ½Ó³ÌÐò”→“Íâ½Ó³ÌÐò¹ÜÀíÆ÷”ÀѡÖÐMouseWheel Fix£¬ÔÚ¼ÓÔØÐÐΪÀïÑ¡ÖГÔÚÆô¶¯ÖмÓÔØ”ºÍ“¼ÓÔØ/Ð¶ÔØ”Á½Ïµã»÷È·¶¨¾Í¼ÓÔØÁË¡£
5¡¢ÔٴιرÕÕâ¸öVB±à¼Æ÷¡£Ôٴδò¿ªVB±à¼Æ÷¡£¿´¿´ÊDz»ÊÇ¿ÉÒÔÓùöÂÖÁË£¿£¡
Ïà¹ØÎĵµ£º
Ò»¿ªÊ¼ ÒÔΪVBµÄÏß³Ì ²»ÊÇÏñÍøÉÏÈË˵µÄÄÇô´àÈõ¡£¡£¡£°¥ ÏÖÔÚÁìÂÔµ½ÁË¡£¡£¡£VPrivate Declare Function CreateThread Lib "kernel32" (lpThreadAttributes As Any, ByVal dwStackSize As Long, ByVal lpStartAddress As Long, ByVal lpParameter As Long, ByVal dwCreationFlags As Long, lpThreadId As Long) As Long
Pri ......
È«Ãæ¿ØÖÆ Excel
Ê×ÏÈ´´½¨ Excel ¶ÔÏó£¬Ê¹ÓÃComObj:
Dim ExcelID as Excel.Application
Set ExcelID as new Excel.Application
1) ÏÔʾµ±Ç°´°¿Ú£º
ExcelID.Visible := True;
2) ¸ü¸Ä Excel ±êÌâÀ¸£º
ExcelID.Caption := 'Ó¦ÓóÌÐòµ÷Óà Microsoft Excel';
3) Ìí¼Óй¤×÷²¾£º
ExcelID.WorkBooks.Add;
4) ´ò¿ªÒÑ´æÔÚµ ......
Public Function IsValidIPAddress(ByVal strIPAddress As String) As Boolean
On Error GoTo Handler
Dim varAddress As Variant, n As Long, lCount As Long
varAddress = Split(strIPAddress, ".", , vbTextCompare)
If IsArray(varAd ......
·×¢ÊÍÄÜʹעÊÍÄÜʹ´úÂë¸ü¼ÓÈÝÒ×Àí½â£¬¸ü¼ÓÈÝÒ׸ú×Ù¡£
·³öÉ«µÄ×¢Ê;ÍÏñÒ»·ùºÃµÄÉè¼ÆÀ¶Í¼£¬Äܹ»Òýµ¼ÔĶÁÕßͨ¹ýÄãµÄÓ¦ÓóÌÐòµÄÇúÕÛÖ®´¦£¬Äܹ»ËµÃ÷Ô¤ÆÚµÄÔËÐнá¹ûºÍ¿ÉÄܳöÏÖµÄÒì³£Çé¿ö¡£
·±à³ÌÔÔò
·ÓÃÎÄ×Ö˵Ã÷´úÂëµÄ×÷ÓÃ
·±àд·Ç³£³öÉ«µÄ ......
¡ôÇëÓÉ´ËÈ·¶¨ÊÇ·ñ±»¶ñÒâÐ޸ġô
×÷ÕߣºÎÒÐÄ·ÉÏè
VBÖÐÒýÈë±¾DLLµÄ·½·¨
·½·¨Ò»£ºÑ¡Ôñ“¹¤³Ì(P)”²Ëµ¥ÏµēÒýÓÃ(N)”£¬ÔÚ³öÏֵĶԻ°¿òÖеã“ä¯ÀÀ°´Å¥”£¬²¢ÕÒµ½DLLËùÔÚλÖá£
·½·¨¶þ£º·ÖÁ½²½×ß
(1)×¢²á¶¯Ì¬Á´½Ó¿â£¬Ê¹ÓÃregsvr32ÃüÁî¡£ÔÚÔËÐжԻ°¿òÖУ¬ÊäÈë“regsvr32 DLLÍêÕû· ......