2009-08-27 9 views
5

vb.netで画面の高さと幅を参照するにはどうすればよいですか?たとえば、右下隅の位置、右上の角の位置などvb.netで画面の高さと幅を参照する

私はMy.Computer.Screenを試しましたが、サイズを教えてくれたものは見つかりませんでした。

を使用でき

答えて

13

My.Computer.Screen.Bounds 

か:

Screen.PrimaryScreen.Bounds 

Boundsサイズを提供して長方形です。また、タスクバーとドッキングされたウィンドウを含まないWorkingAreaを見ることもできます。

使用できるWPFのために
+0

、何そうだろうか? – Cyclone

+0

気にしないでください!ありがとう! – Cyclone

0

System.Windows.SystemParameters.PrimaryScreenWidth 

System.Windows.SystemParameters.PrimaryScreenHeight 
1

あなたはのようなものを使用することができます。

My.Computer.Screen.Bounds.Size.Width 
My.Computer.Screen.Bounds.Size.Height 
-1

のForm_Loadにこのコードを挿入します。私はいくつかの解像度を入れて...整数として

Dim dw As Double 
    Dim dh as Double 


    Width = Screen.PrimaryScreen.Bounds.Width 
    If (Width = 1366) Then 
     dw = 1 
    ElseIf (Width = 1920) Then 
     dw = 1.4055 
    ElseIf (Width = 1280) Then 
     dw = 0.9379 
    End If 

    For Each c As Control In Me.Controls 
     c.Width = CInt(CDbl(c.Width * dw)) 
    Next 

    Height = My.Computer.Screen.Bounds.Size.Height 
    If (Height = 768) Then 
     dh = 1 
    ElseIf (Height = 1080) Then 
     dh = 1.4062 
    ElseIf (Height = 1024) Then 
     dh = 1.3333 
    End If 

    For Each g As Control In Me.Controls 
     g.Height = CInt(CDbl(g.Height * dh)) 
    Next 
+0

コードに説明を追加することを検討してください – arghtype

0

薄暗い高さ= Screen.PrimaryScreen.Bounds.Height 薄暗い幅として整数= Screen.PrimaryScreen.Bounds.Width右下例えばので

関連する問題