VBGood网站全文搜索 Google

搜索VBGood全站网页(全文搜索)
首页 - 经验之谈 - 怎样得到当前的屏幕分辨率?
发表评论(0)作者:不详, 平台:VB6.0+Win98, 阅读:10550, 日期:2001-12-10
怎样得到当前的屏幕分辨率?

在程序设计中我们经常要改变窗体的大小,而这也依赖于屏幕的分辨率,下面的例子将演示如何得到当前屏幕的分辨率:

ResWidth = Screen.Width Screen.TwipsPerPixelX

ResHeight = Screen.Height Screen.TwipsPerPixelY

ScreenRes = ResWidth & "x" & ResHeight

ResWidth和ResHeight分别表示屏幕的宽和高,比如这样的结果:

800x600