VB求算法两个矩形重叠部分给出两个矩形的坐标(x,y)和宽高(w,h),先判断两个矩形是否有重叠然后在算出重叠的部分我用IsRectCross好像不行上面写错了是用IntersectRect

Question

VB 求算法 两个矩形重叠部分
给出两个矩形的坐标(x,y)和宽高(w,h),先判断两个矩形是否有重叠 然后在算出 重叠的部分 我用IsRectCross 好像不行
上面写错了 是用 IntersectRect

Answer 1

假定第一个矩形的坐标为x1,y1,宽高为w1,h1,第二个矩形的坐标为x2,y2,宽高为w2,h2：If X2 > X1 And X2 < X1 + w1 And Y2 > Y1 And Y2 < Y1 + h1 ThenMsgBox "两个矩形有重叠,重叠区域：x=" & X2 & " y=" & Y2 & " w="...