发表评论(0)作者:不详, 平台:VB6.0+Win98, 阅读:10752, 日期:2001-12-10
怎样得到当前的屏幕分辨率?
在程序设计中我们经常要改变窗体的大小,而这也依赖于屏幕的分辨率,下面的例子将演示如何得到当前屏幕的分辨率:
ResWidth = Screen.Width Screen.TwipsPerPixelX
ResHeight = Screen.Height Screen.TwipsPerPixelY
ScreenRes = ResWidth & "x" & ResHeight
ResWidth和ResHeight分别表示屏幕的宽和高,比如这样的结果:
800x600
在程序设计中我们经常要改变窗体的大小,而这也依赖于屏幕的分辨率,下面的例子将演示如何得到当前屏幕的分辨率:
ResWidth = Screen.Width Screen.TwipsPerPixelX
ResHeight = Screen.Height Screen.TwipsPerPixelY
ScreenRes = ResWidth & "x" & ResHeight
ResWidth和ResHeight分别表示屏幕的宽和高,比如这样的结果:
800x600