vba让按钮的大小自适应-excel vba窗体设计,漂亮的excelvba窗体

任何操作都被禁止,比较难,这样子我要关机也不行,或者有什么突发事件也没法处理.失去了软件原有的便捷性.也就失去了软件本身的意义

问题说清楚行吗？自适应什么呀，
问题一百目标为将窗口大小设定为超出屏幕分度辨率即可,
问题二目标为在脚本运行的过程中, 始终保持鼠标限定问在屏幕范围答之内进行活动, 不能超出范围, 在范围内无论专进行什么样的鼠标操作(单击, 双击, 长按等), 都不会影响限制鼠标的范围及功属能.

使用以来下代码获取屏幕分辨率：自
Declare Function GetSystemMetrics32 Lib "user32" _
Alias "GetSystemMetrics" (ByVal nIndex As Long) As Long
Sub DisplayMonitorInfo()
Dim X As Long, Y As Long
X = GetSystemMetrics32(0) ' 宽度（像百素）
Y = GetSystemMetrics32(1) ' 高度（像素）
End Sub

然后再根据高度宽计算并设置窗问体及各控答件大小即可