我正在使用多显示器设置。我知道你可以做Screen.AllScreens(x)来获得一个特定的屏幕,但有没有办法确定哪个屏幕在哪个位置?
即。
屏幕0在右侧,屏幕1在左侧,屏幕2在中间
我试图在每个屏幕的左上角放置一个表单,而我能想到的唯一方法是
Me.Location = New Point(-Screen.AllScreens(1).Bounds.Width, Screen.AllScreens(1).Bounds.Top)
(假设屏幕1在左侧)
任何帮助?
将它包装在一个自动生成每个屏幕的表单的循环中也会很棒,但我可以自己处理。我只需知道如何将每个位置放在每个屏幕的左上角..
谢谢:3
答案 0 :(得分:2)
正如我在另一个网站上提到的,如果我正确地理解你,那么这样的事情应该按照你的意愿去做:
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim number = 1
For Each scr In Screen.AllScreens.OrderBy(Function(s) s.Bounds.Left)
Dim f As New Form With {.Text = number.ToString(),
.StartPosition = FormStartPosition.Manual,
.Location = scr.Bounds.Location}
f.Show()
number += 1
Next
End Sub