Visual Basic Tips

画面サイズのピクセル値への変換

Screen.Width,HeightはTwip値ですから、ピクセルに変換するには１ピクセルあたりのTwip数であるScreen.TwipsPerPixel？で割ってやります。

Private Sub Form_Load()
　　Debug.Print Screen.Width / Screen.TwipsPerPixelX
　　Debug.Print Screen.Height / Screen.TwipsPerPixelY
End Sub