VB 怎么设置窗体的大小随着屏幕分辨率自动改变

代码越简单越好

2024-11-29 08:43:45

推荐回答（3个）

回答1：

自动改变难度不大，如：
Private Sub Form_Load()
Form1.Width = Screen.Width
Form1.Height = Screen.Height
End Sub

还有一种办法是设置，启动是最大化。

但窗体大小的变更会影响窗体上各控件的布局，重新布局很繁很繁，窗体上每个控件的位置或大小都要重新定义。

回答2：

1：获取当前屏幕的分辨率/当前窗体的大小（这个要转成像素单位）=比值
2：当前屏幕的分辨率×比值
你再加点分，我给你代码。

回答3：

在过程form_resize()里处理