主题：如何获得当前系统分辨率
jiajun
[专家分：0] 发布于 2008-02-14 15:23:00
如何获得当前系统分辨率
回复列表 （共4个回复）
沙发
FieldMAX [专家分：12740] 发布于 2008-02-14 16:30:00
Screen.Width 和 Screen.Height
板凳
老大徒伤悲 [专家分：29120] 发布于 2008-02-14 19:42:00
用得好
3 楼
anbry [专家分：380] 发布于 2008-02-15 14:56:00
用VB的都让你们说了，那我来个API的吧！
'声明
Public Const SM_CXSCREEN = 0
Public Const SM_CYSCREEN = 1
Public Declare Function GetSystemMetrics Lib "user32" Alias "GetSystemMetrics" (ByVal nIndex As Long) As Long
'调用方法
dim cx As Long,cy As Long
cx = GetSystemMetrics(SM_CXSCREEN);
cy = GetSystemMetrics(SM_CYSCREEN);
cx，cx就是当前桌面的x和y分辨率
4 楼
家人 [专家分：6760] 发布于 2008-02-16 10:03:00
与楼上API结果对应的应该是：
Screen.Width / Screen.TwipsPerPixelX
Screen.Height / Screen.TwipsPerPixelY
我来回复
您所在位置：社区首页 — Visual Basic讨论区 — 如何获得当前系统分辨率