VB.NET多屏幕范围获取及窗体跨屏位置异常处理问询

核心思路 #

启动应用时，先获取当前系统所有可用屏幕的工作区域范围（排除任务栏、dock等系统UI占用区域），检查上次保存的窗体位置是否落在任意一个屏幕的工作区内。如果完全超出所有屏幕范围，就将窗体重置到主屏幕的可视区域内。

具体实现步骤 #

• 获取当前所有屏幕的工作区：遍历系统中所有可用屏幕的实际可放置区域，不要仅依赖单屏幕分辨率。
• 验证保存位置合法性：把保存的窗体位置和尺寸转换成矩形，检查该矩形是否与任意屏幕的工作区有交集，无交集则判定为位置非法。
• 重置窗体位置：位置非法时，将窗体移动到主屏幕的工作区内，比如屏幕中心或左上角（避免被系统UI遮挡）。

代码示例（C# WinForms） #

private void Form_Load(object sender, EventArgs e)
{
    // 读取上次保存的窗体位置与尺寸
    int savedX = Properties.Settings.Default.WindowX;
    int savedY = Properties.Settings.Default.WindowY;
    int savedWidth = Properties.Settings.Default.WindowWidth;
    int savedHeight = Properties.Settings.Default.WindowHeight;

    Rectangle savedBounds = new Rectangle(savedX, savedY, savedWidth, savedHeight);
    bool isPositionValid = false;

    // 遍历所有屏幕，验证位置是否在可视区域内
    foreach (Screen screen in Screen.AllScreens)
    {
        if (screen.WorkingArea.IntersectsWith(savedBounds))
        {
            isPositionValid = true;
            break;
        }
    }

    if (isPositionValid)
    {
        this.Bounds = savedBounds;
    }
    else
    {
        // 重置到主屏幕中心
        Screen primaryScreen = Screen.PrimaryScreen;
        this.StartPosition = FormStartPosition.Manual;
        this.Left = (primaryScreen.WorkingArea.Width - this.Width) / 2;
        this.Top = (primaryScreen.WorkingArea.Height - this.Height) / 2;
        
        // 更新保存的设置，避免下次启动重复出现问题
        Properties.Settings.Default.WindowX = this.Left;
        Properties.Settings.Default.WindowY = this.Top;
        Properties.Settings.Default.Save();
    }
}

额外优化点 #

• 尺寸适配：如果保存的窗体宽高超过当前所有屏幕的最大可用尺寸，可自动调整到屏幕工作区的最大适配尺寸。
• 局部偏移处理：若窗体仅小部分超出屏幕，可仅调整位置让窗体完全可见，而非直接重置到中心。

内容的提问来源于stack exchange，提问作者DavidGraham