资源描述:
《VB 天气预报源代码.doc》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库。
1、PrivateDeclareFunctionSetWindowPosLib"user32"(ByValhwndAsLong,ByValhWndInsertAfterAsLong,ByValXAsLong,ByValYAsLong,ByValcxAsLong,ByValcyAsLong,ByValwFlagsAsLong)AsLongPrivateDeclareFunctionCreateRectRgnLib"gdi32"(ByValX1AsLong,ByValY1AsLong,ByValX2AsLong,ByValY2AsLong)AsLongPrivat
2、eDeclareFunctionCreateRoundRectRgnLib"gdi32"(ByValX1AsLong,ByValY1AsLong,ByValX2AsLong,ByValY2AsLong,ByValX3AsLong,ByValY3AsLong)AsLongPrivateDeclareFunctionSetWindowRgnLib"user32"(ByValhwndAsLong,ByValhRgnAsLong,ByValbRedrawAsBoolean)AsLongPrivateDeclareFunctionGetCursorPosLib"us
3、er32"(lpPointAsPOINTAPI)AsLongPrivateTypePOINTAPIXAsLongYAsLongEndTypePrivateDeclareFunctionReleaseCaptureLib"user32"()AsLongPrivateDeclareFunctionSendMessageLib"user32"Alias"SendMessageA"(ByValhwndAsLong,ByValwMsgAsLong,ByValwParamAsLong,lParamAsAny)AsLongPrivateConstHTCAPTION=2P
4、rivateConstWM_NCLBUTTONDOWN=&HA1PrivateConstWS_EX_LAYEREDAsLong=&H80000PrivateConstLWA_ALPHAAsLong=&H2PrivateConstGWL_EXSTYLE=(-20)PrivateConstRDW_INVALIDATE=&H1PrivateConstRDW_ERASE=&H4PrivateConstRDW_ALLCHILDREN=&H80PrivateConstRDW_FRAME=&H400PrivateDeclareFunctionSetWindowLongL
5、ib"user32"Alias"SetWindowLongA"(ByValhwndAsLong,ByValnIndexAsLong,ByValdwNewLongAsLong)AsLongPrivateDeclareFunctionGetWindowLongLib"user32"Alias"GetWindowLongA"(ByValhwndAsLong,ByValnIndexAsLong)AsLongPrivateDeclareFunctionSetLayeredWindowAttributesLib"user32"(ByValhwndAsLong,ByVa
6、lcrKeyAsLong,ByValbAlphaAsLong,ByValdwFlagsAsLong)AsLongPrivateDeclareFunctionShell_NotifyIconLib"shell32"Alias"Shell_NotifyIconA"(ByValdwMessageAsLong,pnidAsNOTIFYICONDATA)AsBooleanPrivateTypeNOTIFYICONDATAcbSizeAsLonghwndAsLongUIDAsLonguFlagsAsLonguCallbackMessageAsLonghIconAsLo
7、ngszTipAsString*64EndTypePrivateConstNIM_ADD=&H0PrivateConstNIM_MODIFY=&H1PrivateConstNIM_DELETE=&H2PrivateConstNIF_MESSAGE=&H1PrivateConstNIF_ICON=&H2PrivateConstNIF_TIP=&H4PrivateConstNIF_DOALL=NIF_MESSAGEOrNIF_ICONOrNIF_TIPPrivateConstWM_MOUSEMOVE=&H200PrivateConstWM_LBUTTONDBL
8、CLK=&H203PrivateConstWM_LBUTTONDO