程序不会在定义的位置加载

Question

我无法将程序打开到我的第二个屏幕，这是我在加载表单时遇到的问题：

Imports DAL
Imports System.Configuration
Imports System.Data
Imports System.Data.SqlClient
Imports System.Data.SqlTypes
Imports System.IO
Imports System.Linq

Public Class frmMain
  Public Property FormBounds As Rectangle

Private Sub frmMain_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    Try

        Dim x = 1280
        Dim y = 0

        'declare 2nd screen as default monitor to open program
        Dim monitor = Screen.AllScreens.Where(Function(scr) Not scr.Primary).FirstOrDefault

        'set 1st screen as default if 2nd screen not detected
        If monitor Is Nothing Then
            monitor = Screen.AllScreens.Where(Function(scr) scr.Primary).First
        End If

        Me.FormBounds = monitor.workarea
        Me.Location = New Point(x, y)

    Catch ex As Exception
        Me.subErrLog("frmMain_Load", ex.Message)
    End Try
End Sub

End Class

出于测试目的，我将 x 和 y 坐标放在代码本身中。但是当我的笔记本电脑连接到辅助显示器进行测试时，两个分辨率都是 1280 * 720，程序一直加载到第一个屏幕。

我已经在这个问题上苦思了好几个星期了，但我仍然找不到这个问题的原因。