VB开发软件适应任何分辨率的问题
发布网友
发布时间：2022-04-22 15:33
共1个回答
热心网友
时间：2022-07-12 05:34
检测屏幕分辨率，所有控件按分辨率重设位置和大小。
检测分辨率的方法如下：
Private Sub ttt() Static W As Long If W > 0 And W <> Screen.Width Then MsgBox "屏幕分辨率已从 " & W / Screen.TwipsPerPixelX & " 变为 " & Screen.Width / Screen.TwipsPerPixelX End If W = Screen.WidthEnd Sub追问那控件怎么重设位置大小呢
追答就是 控件的 的位置属性呀 ，在 属性面板能看到的！
