在雙螢幕系統中如何指定WinForm在指定的螢幕出現

下列的程式片段可以幫你把WinForm搬到第一個非主要的螢幕

  Private Sub MoveToNonPrimaryScreen()
      For Each MyScreen As Screen In Screen.AllScreens  '對所有的螢幕 
            If Not MyScreen.Primary Then '找到不是主要的第一個螢幕
                bPanelFrom.Show()
                bPanelFrom.Left = MyScreen.WorkingArea.X '把自己的位置長寬與該螢幕設的一樣 
                bPanelFrom.Top = MyScreen.WorkingArea.Y
                bPanelFrom.Width = MyScreen.WorkingArea.Width
                bPanelFrom.Height = MyScreen.WorkingArea.Height

                Exit For
            End If
      Next
  End Sub