如果我的电视监视器未连接到VB.NET中的计算机，如何禁止屏幕分割

我有这段代码，可以将特定表单拆分到我的电视监视器

Dim screen As Screen
screen = screen.AllScreens(1)
QueueingWindow.StartPosition = FormStartPosition.Manual
QueueingWindow.Location = screen.Bounds.Location + New Point(100, 100)
QueueingWindow.Show()

但当我的电视监视器未连接时，我在屏幕分割中遇到了代码错误。 我如何使我的程序运行，即使我有这个代码

我自己有一个想法，但我不知道在我的if语句旁边放什么，如果我把它连接到我的电视监视器上，就允许屏幕分割

我的想法是：

If (mytvconnectorisavailable) Then
    Dim screen As Screen
    screen = screen.AllScreens(1)
    QueueingWindow.StartPosition = FormStartPosition.Manual
    QueueingWindow.Location = screen.Bounds.Location + New Point(100, 100)
    QueueingWindow.Show()
End if

它只允许在我的电视监视器连接到计算机时运行此代码

---

如果我做错了，请告诉我。谢谢

你没有认真考虑过这个问题。您依赖于

AllScreens

有第二个元素，那么您需要检查

AllScreens

是否至少有两个元素，这怎么不明显呢？谢谢您的想法！我已经解决了我的问题。我使用了

Screen.AllScreens.Length=2

If Screen.AllScreens.Length = 2 Then
    Dim screen As Screen
    screen = screen.AllScreens(1)
    QueueingWindow.StartPosition = FormStartPosition.Manual
    QueueingWindow.Location = screen.Bounds.Location + New Point(100, 100)
    QueueingWindow.Show()
End if