[VB] 화면 픽셀 크기 구하기

■ 화면 픽셀 크기를 구하는 방법을 보여준다.

▶ 예제 코드 (VB)


Public Function GetScreenWidth() As Integer

    GetScreenWidth = Screen.Width / Screen.TwipsPerPixelX ' 화면 너비(트윕 단위) / 픽셀당 트윕 수 X

End Function

Public Function GetScreenHeight() As Integer

    GetScreenHeight = Screen.Height / Screen.TwipsPerPixelY ' 화면 높이(트윕 단위) / 픽셀당 트윕 수 Y

End Function

Public Function GetScreenWidth() As Integer

GetScreenWidth = Screen.Width / Screen.TwipsPerPixelX ' 화면 너비(트윕 단위) / 픽셀당 트윕 수 X

End Function

Public Function GetScreenHeight() As Integer

GetScreenHeight = Screen.Height / Screen.TwipsPerPixelY ' 화면 높이(트윕 단위) / 픽셀당 트윕 수 Y

End Function