跟我学VBA我这里专注VBA, 授人以渔。我98年开始从源码接触VBA已经20余年了随着年龄的增长越来越觉得有必要把这项技能传递给需要这项技术的职场人员。希望职场和数据打交道的朋友都来学习VBA,利用VBA,起码可以提高自己的工作效率可以有时间多陪陪父母多陪陪家人何乐而不为呢我的教程一共九套从入门开始一直讲到程序的分发是学习利用VBA的实用教程。这份API资料是随高级教程赠送的。这些内容是MS的权威资料看似枯燥但对于想学习API函数的朋友是非常有用的。这讲我们继续学习VBA 64位API声明语句第025讲【分享成果随喜正能量】一般薄福之人从来不懂感恩。古人云:“一碗米养恩人一担米养仇人。”薄福的人活在自我错误的认知世界里个性固执且多疑总是被情绪牵着鼻子走。既然有幸遇到佛法首先要打开自己的心胸去除心魔常怀感恩心。多积福积德幸运之神一定会眷顾你。至于有些负能量的人你度不了他那就选择远离。修行需要清静无论环境还是心情。Const R2_NOTXORPEN 10 DPxnConst R2_NOP 11 DConst R2_MERGENOTPEN 12 DPnoConst R2_COPYPEN 13 PConst R2_MERGEPENNOT 14 PDnoConst R2_MERGEPEN 15 DPoConst R2_WHITE 16 1Const R2_LAST 16 Ternary raster operationsConst SRCCOPY HCC0020 (DWORD) dest sourceConst SRCPAINT HEE0086 (DWORD) dest source OR destConst SRCAND H8800C6 (DWORD) dest source AND destConst SRCINVERT H660046 (DWORD) dest source XOR destConst SRCERASE H440328 (DWORD) dest source AND (NOT dest )Const NOTSRCCOPY H330008 (DWORD) dest (NOT source)Const NOTSRCERASE H1100A6 (DWORD) dest (NOT src) AND (NOT dest)Const MERGECOPY HC000CA (DWORD) dest (source AND pattern)Const MERGEPAINT HBB0226 (DWORD) dest (NOT source) OR destConst PATCOPY HF00021 (DWORD) dest patternConst PATPAINT HFB0A09 (DWORD) dest DPSnooConst PATINVERT H5A0049 (DWORD) dest pattern XOR destConst DSTINVERT H550009 (DWORD) dest (NOT dest)Const BLACKNESS H42 (DWORD) dest BLACKConst WHITENESS HFF0062 (DWORD) dest WHITEConst GDI_ERROR HFFFFFFFFConst HGDI_ERROR As LongPtr -1 -1 Long (HFFFFFFFF) on 32-bit VBA; -1 LongLong (HFFFFFFFFFFFFFFFF^) on 64-bit VBA Region FlagsConst ERRORAPI 0Const NULLREGION 1Const SIMPLEREGION 2Const COMPLEXREGION 3 CombineRgn() StylesConst RGN_AND 1Const RGN_OR 2Const RGN_XOR 3Const RGN_DIFF 4Const RGN_COPY 5Const RGN_MIN RGN_ANDConst RGN_MAX RGN_COPY StretchBlt() ModesConst BLACKONWHITE 1Const WHITEONBLACK 2Const COLORONCOLOR 3Const HALFTONE 4Const MAXSTRETCHBLTMODE 4 PolyFill() ModesConst ALTERNATE 1Const WINDING 2Const POLYFILL_LAST 2 Text Alignment OptionsConst TA_NOUPDATECP 0Const TA_UPDATECP 1Const TA_LEFT 0Const TA_RIGHT 2Const TA_CENTER 6Const TA_TOP 0Const TA_BOTTOM 8Const TA_BASELINE 24Const TA_MASK (TA_BASELINE TA_CENTER TA_UPDATECP)Const VTA_BASELINE TA_BASELINEConst VTA_LEFT TA_BOTTOMConst VTA_RIGHT TA_TOPConst VTA_CENTER TA_CENTERConst VTA_BOTTOM TA_RIGHTConst VTA_TOP TA_LEFTConst ETO_GRAYED 1Const ETO_OPAQUE 2Const ETO_CLIPPED 4Const ASPECT_FILTERING H1Const DCB_RESET H1Const DCB_ACCUMULATE H2Const DCB_DIRTY DCB_ACCUMULATEConst DCB_SET (DCB_RESET Or DCB_ACCUMULATE)Const DCB_ENABLE H4Const DCB_DISABLE H8 Metafile FunctionsConst META_SETBKCOLOR H201Const META_SETBKMODE H102Const META_SETMAPMODE H103Const META_SETROP2 H104Const META_SETRELABS H105Const META_SETPOLYFILLMODE H106Const META_SETSTRETCHBLTMODE H107Const META_SETTEXTCHAREXTRA H108Const META_SETTEXTCOLOR H209Const META_SETTEXTJUSTIFICATION H20AConst META_SETWINDOWORG H20BConst META_SETWINDOWEXT H20CConst META_SETVIEWPORTORG H20DConst META_SETVIEWPORTEXT H20EConst META_OFFSETWINDOWORG H20FConst META_SCALEWINDOWEXT H410Const META_OFFSETVIEWPORTORG H211Const META_SCALEVIEWPORTEXT H412Const META_LINETO H213Const META_MOVETO H214Const META_EXCLUDECLIPRECT H415Const META_INTERSECTCLIPRECT H416Const META_ARC H817Const META_ELLIPSE H418Const META_FLOODFILL H419Const META_PIE H81AConst META_RECTANGLE H41BConst META_ROUNDRECT H61CConst META_PATBLT H61DConst META_SAVEDC H1EConst META_SETPIXEL H41FConst META_OFFSETCLIPRGN H220Const META_TEXTOUT H521Const META_BITBLT H922Const META_STRETCHBLT HB23Const META_POLYGON H324Const META_POLYLINE H325Const META_ESCAPE H626Const META_RESTOREDC H127Const META_FILLREGION H228Const META_FRAMEREGION H429Const META_INVERTREGION H12AConst META_PAINTREGION H12BConst META_SELECTCLIPREGION H12CConst META_SELECTOBJECT H12DConst META_SETTEXTALIGN H12EConst META_CHORD H830Const META_SETMAPPERFLAGS H231Const META_EXTTEXTOUT HA32Const META_SETDIBTODEV HD33Const META_SELECTPALETTE H234Const META_REALIZEPALETTE H35Const META_ANIMATEPALETTE H436Const META_SETPALENTRIES H37Const META_POLYPOLYGON H538Const META_RESIZEPALETTE H139Const META_DIBBITBLT H940Const META_DIBSTRETCHBLT HB41Const META_DIBCREATEPATTERNBRUSH H142Const META_STRETCHDIB HF43Const META_EXTFLOODFILL H548Const META_DELETEOBJECT H1F0Const META_CREATEPALETTE HF7Const META_CREATEPATTERNBRUSH H1F9Const META_CREATEPENINDIRECT H2FAConst META_CREATEFONTINDIRECT H2FBConst META_CREATEBRUSHINDIRECT H2FCConst META_CREATEREGION H6FF GDI EscapesConst NEWFRAME 1Const AbortDocC 2Const NEXTBAND 3Const SETCOLORTABLE 4Const GETCOLORTABLE 5Const FLUSHOUTPUT 6Const DRAFTMODE 7Const QUERYESCSUPPORT 8Const SETABORTPROC 9Const StartDocC 10当学员学习到高级阶段如果引用API这个资料可以直接查到64位写法。大多数情况下我们是将低版本的程序文件升级到高版本这时您就不必为如下的错误提示所困扰了我20多年的VBA实践经验全部浓缩在下面的各个教程中