鼠标移入移出事件

.如果 (0 ≤ 横向位置 且 横向位置 ≤ 标签3.宽度 且 0 ≤ 纵向位置 且 纵向位置 ≤ 标签3.高度)
.如果真 (是否移入 ＝ 假)
SetCapture (标签3.取窗口句柄 ())
标签2.标题 ＝ “鼠标移入”
是否移入 ＝ 真
.如果真结束

.否则
.如果真 (是否移入 ＝ 真)
ReleaseCapture ()
标签2.标题 ＝ “鼠标移出”
是否移入 ＝ 假