vba獲取鼠標(biāo)位置 VBA里,如何獲取鼠標(biāo)坐標(biāo)?簡單點(diǎn)?
VBA里,如何獲取鼠標(biāo)坐標(biāo)?簡單點(diǎn)?DeclareFunctionGetCursorPosLib“user32”(lpPointAsPOINTAPI)aslongtypointapixaslongya
VBA里,如何獲取鼠標(biāo)坐標(biāo)?簡單點(diǎn)?
DeclareFunctionGetCursorPosLib“user32”(lpPointAsPOINTAPI)aslongtypointapixaslongyaslongendtypepublicsfunctiongetmouseuxuy()AsPOINTAPIGetCursorPosgetmouseuxuyendfunctionsubtest()“callgetmouseuxuu”Call“get mouse coordinate value procedure”(假設(shè)您給出的過程/程序名為getmouse)uxuy)ifgetmouseuxuy、 x>100和getmouseuxuy.y>100然后……“根據(jù)返回到當(dāng)前鼠標(biāo)endsub的坐標(biāo)值執(zhí)行一個(gè)過程/程序