vb.NET 屏幕位置
vb.NET Screen Location
我正在使用多显示器设置。我知道您可以执行 Screen.AllScreens(x) 以获得特定屏幕,但是有什么方法可以识别哪个屏幕位于哪个位置?
即
右边是屏幕0,左边是屏幕1,中间是屏幕2
我试图在每个屏幕的左上角放置一个表格,我能想到的唯一方法是
Me.Location = New Point(-Screen.AllScreens(1).Bounds.Width, Screen.AllScreens(1).Bounds.Top)
(假设屏幕 1 在左侧)
有什么帮助吗?
将它包装在某种循环中,为每个屏幕自动生成表单也很棒,但我自己可以处理。我只需要知道如何将每一个定位在每个屏幕的左上角..
谢谢:3
正如我在另一个网站上提到的那样,如果我对您的理解正确,那么应该按照您的意愿执行类似这样的操作:
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
我正在使用多显示器设置。我知道您可以执行 Screen.AllScreens(x) 以获得特定屏幕,但是有什么方法可以识别哪个屏幕位于哪个位置?
即
右边是屏幕0,左边是屏幕1,中间是屏幕2
我试图在每个屏幕的左上角放置一个表格,我能想到的唯一方法是
Me.Location = New Point(-Screen.AllScreens(1).Bounds.Width, Screen.AllScreens(1).Bounds.Top)
(假设屏幕 1 在左侧)
有什么帮助吗?
将它包装在某种循环中,为每个屏幕自动生成表单也很棒,但我自己可以处理。我只需要知道如何将每一个定位在每个屏幕的左上角..
谢谢:3
正如我在另一个网站上提到的那样,如果我对您的理解正确,那么应该按照您的意愿执行类似这样的操作:
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