［声明］

Declare Function CreateRectRgn Lib "gdi32" (ByVal X1 As Long, ByVal Y1 As Long, ByVal X2 As Long, ByVal Y2 As Long) As Long

［说明］

创建一个由点X1，Y1和X2，Y2描述的矩形区域

［参数表］

X1,Y1 ---------- Long，矩形左上角X，Y坐标

X2,Y2 ---------- Long，矩形右下角X，Y坐标

［返回值］

Long，执行成功为区域句柄，失败则为零

［其它］

不用时一定要用DeleteObject函数删除该区域

这个矩形的下边和右边不包含在区域之内