VBÎÞËù²»ÄÜÖ®ËÄ£ºÖÆ×÷͸Ã÷ºÍ°ë͸Ã÷´°Ìå
VBÎÞËù²»ÄÜÖ®ËÄ£ºÖÆ×÷͸Ã÷ºÍ°ë͸Ã÷´°Ìå
——×÷ÕߣºÖÓÉù
ÎÒÃǾ³£¿ÉÒÔ¿´µ½ÕâÑùµÄ´°Ì壬¾õµÃºÜìÅ£¬ÈçͼËùʾ£º
ͬÑù£¬¶ÔWindowsϵͳ·½ÃæµÄ±à³ÌËÆºõÊ×ÏÈÏëµ½µÄ¾ø¶Ô²»ÊÇVB£¬¶ø´ó²¿·Ö³ÌÐòÔ±Ïëµ½µÄÒ»¶¨ÊÇVC¡£
Æäʵ£¬VB¶ÔÓÚÕâ¸öʵÏַdz£·½±ãÇÒ¼òµ¥£¬Óõ½ÁË“user32”ÖеÄSetLayeredWindowAttributes()º¯Êý¡£
SetLayeredWindowAttributes()º¯Êý½éÉÜ£º
º¯ÊýÉùÃ÷£º
Declare Function SetLayeredWindowAttributes Lib "user32" () Declare Function SetLayeredWindowAttributes Lib "user32" (ByVal hwnd As Long, ByVal crKey As Long, ByVal bAlpha As Byte, ByVal dwFlags As Long) As Long
hwndÊÇ͸Ã÷´°ÌåµÄ¾ä±ú£¬
crKeyΪÑÕɫֵ£¬
bAlphaÊÇ͸Ã÷¶È£¬È¡Öµ·¶Î§ÊÇ[0,255]£¬
dwFlagsÊÇ͸Ã÷·½Ê½£¬¿ÉÒÔÈ¡Á½¸öÖµ£ºµ±È¡ÖµÎªLWA_ALPHAʱ£¬crKey²ÎÊýÎÞЧ£¬bAlpha²ÎÊýÓÐЧ£»
µ±È¡ÖµÎªLWA_COLORKEYʱ£¬bAlpha²ÎÊýÓÐЧ¶ø´°ÌåÖеÄËùÓÐÑÕɫΪcrKeyµÄµØ·½½«±äΪ͸Ã÷¡£
ÏÂÃæÎÒÃÇ×öÁ½¸öʵÑ飺
µÚÒ»¸ö£º×öÒ»¸ö°ë͸Ã÷´°Ìå
²½ÖèÒ»£º´ò¿ªVB½¨Á¢Ò»¸ö´°ÌåForm
²½Öè¶þ£º½«´°Ìå±³¾°ÑÕÉ«ÉèΪ£º&HFF0000
²½ÖèÈý£º½«ÏÂÃæ´úÂëÕ³Ìùµ½³ÌÐòÖУº
Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" () Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long) As Long
Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" () Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
Declare Function SetLayeredWindowAttributes Lib "user32" () Declare Function SetLayeredWindowAttributes Lib "user32" (ByVal hwnd As Long, ByVal crKey As Long, ByVal bAlpha As Byte, ByVal dwFlags As Long) As Long
Private Const WS_EX_LAYERED = &H80000
Const GWL_EXSTYLE = () Const GWL_EXSTYLE = (-20)
Private Const LWA_ALPHA = &H2
Private Const LWA_COLORKEY = &H1
Sub Form_Load() Sub Form_Load()
&nb
Ïà¹ØÎĵµ£º
App ¶ÔÏóÊÇVBÓ¦ÓóÌÐòµÄÈ«¾ÖÐÅÏ¢£¬ÈçÓ¦ÓóÌÐòµÄ±êÌâ¡¢°æ±¾ÐÅÏ¢¡¢¿ÉÖ´ÐÐÎļþºÍ°ïÖúÎļþµÄ·¾¶¼°Ãû³ÆÒÔ¼°ÊÇ·ñÔËÐÐǰһ¸öÓ¦ÓóÌÐòµÄʾÀý¡£
ÊôÐÔ
£££££££ ÆäËûÊôÐÔ£££££££££££££££££
EXEName ÊôÐÔ ·µ»Øµ±Ç°ÕýÔËÐеĿÉÖ´ÐÐÎļþ ......
·ÐÙÑÀÀû±ê¼Ç·¨
·Ê¹ÓÃ3×Ö·ûǰ׺À´±íʾÊý¾ÝÀàÐͺͿؼþÀàÐÍ
·3¸ö×Ö·û¿ÉÒÔʵÏÖ³ä·Ö¶à±äÐÔ£¬²¢Ê¹Ç°×ººÏºõÂß¼ºÍÖ±¹Û
·±íʾ±äÁ¿µÄ×÷ÓÃÓò
·¿ÉÒÔ²¢ÇÒÓ¦¸ÃʹÓÃǰ׺À´±íʾ±äÁ¿µÄ×÷ÓÃÓò ......
·½çÃæÉè¼Æ±ØÐë±£³ÖÒ»ÖÂ
·Á½¸ö³ÌÐòÖ®¼äµÄÌØÐԾ߱¸¹²ÐÔ
·ºÍwindowsÓ¦ÓóÌÐòµÄ¿ì½Ý¼üÊÇÒ»ÖµÄ
·±à³ÌÔÔò
·Îª´°Ì帳ÓèͳһµÄÍâ¹ÛºÍÐÐÎªÌØÐÔ
·Èç¹û´°ÌåµÄ´óС¸Ä±äʱ£¬Ëü²»¸Ä±äÆäÄÚÈݵĴóС£¬ÄÇô±ß¿ò¾Í²»Ó ......
VB6IDEMouseWheelAddin.dll
¾ÍÊÇÕâ¸öÄÜʹÄãÔÚVBµÄ´úÂë±à¼´°¿ÚÄܹ»Ê¹ÓÃÊó±ê¹öÂÖ£¬±à¼´úÂë¡¢²é¿´´úÂë¸ü·½±ã¡£
ÏÂÃæÏêÊö£º
1¡¢¸ø´ó¼ÒÒ»¸öÏÂÔØµØÖ·£º
http://download.microsoft.com/download/e/f/b/efb39198-7c59-4ace-a5c4-8f0f88e00d34/vb6mousewheel.exeÓÒ»÷½âѹ£¬ÔÙÓÒ»÷½âѹ£¬Õâʱ¾Í»á¿´µ½Ò»¸ödllÎļþ£¬Õâ¸ö¾ÍÊÇÎÒ ......
VC++
ÓëVB
Êý¾ÝÀàÐͶÔÓ¦¹ØÏµ
ÔÚ×öVCÓëvb³ÌÐò¼ä»¥Ïàµ÷Óã¬ÐèҪעÒâÁ½ÖÖÓïÑÔ²»Í¬±àÒëÆ÷¶ÔÊý¾ÝÀàÐ͵͍ÒåÇø±ð£¬´ËʱÁ½ÕßÊý¾ÝÀàÐ͵ĶÔÓ¦¹ØÏµ¾ÍÏÔµÃÊ®·ÖµÄÖØÒª£¬¶ÔÓ¦¹ØÏµÒÔ¼°ÉùÃ÷·½Ê½ÈçÏÂËùʾ¡£
VC++
VB
short
Integer
int
Long
long
Long
UNIT
Long
ULONG
Long
WORD
DWORDLon ......