小编Gig*_*123的帖子

我有一个 Excel 用户表单，我想在打开时调整大小以适应屏幕分辨率。

Application.Height我通过和获取高度和宽度Application.Width，通常使用这两个参数和以下代码，应该可以解决问题：

Me.Top = Application.Top
Me.Left = Application.Left
Me.Height = Application.Height
Me.Width = Application.Width

问题是：Windows（至少从 7 开始）有一个参数可以设置桌面缩放，这似乎会损害代码。

例如，当从 100% 更改为 150% 时，表单的宽度和高度设置正确，但缩放不正确。我想根据 Windows 桌面缩放来更改它。

如何检索桌面缩放参数？