限制窗口显示在屏幕内的功能

.如果真 (re.ToP ＝ 0 且 re.Left ＝ 0 且 re.Right ＞ re.Bottom) ' 任务栏在顶部
wei ＝ “上边”
gao ＝ gao ＋ re.Bottom