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

代码越简单越好

推荐答案推荐于2018-05-09

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

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

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

温馨提示：答案为网友推荐，仅供参考

当前网址：http://00.wendadaohang.com/zd/rnBIeenII.html

其他回答

第1个回答 2011-09-19

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

第2个回答 2011-09-19

在过程form_resize()里处理

相似回答

VB中,修改屏幕分辨率后,如何让窗体大小跟着变?答：int WINAPI icePub_sizeFormToScreen(HWND hWnd,int screenModel)输入：hWnd 窗口句柄 screenModel 0 动态随屏幕调整,否则固定:1 640x480,2 800x600,3 1024x768 输出：Private Declare Function icePub_sizeFormToScreen Lib "icePubDll.dll" (ByVal hWnd As Long,ByVal screenModel As Integer) As...

VB中MDI窗体的背景设置要全屏,并且随着分辨率的变化而自动全屏答：Me.WindowState = 2 ‘(把当前窗体全屏) 注:=0 正常大小,=1 最小化如果你只是需要把当前窗体上的一个控件（比如说图片控件(image)，其它控件思路相同）全屏只需如下代码:Me.WindowState = 2 Image1.Top = 0: Image1.Left = 0 Image1.Height = Me.Height: Image1.Width = Me.Width ...

vb怎么让窗体自动适应屏幕大小答：设计窗体的时候设置分辨率800*600或是1024*768，放到其他机子上时调成对应的就OK了，这是最简单的方法，不然就用代码控制。

vb6.0中如何根据分辨率自动改变窗体中控件的大小答：比如 image.top = screen.hight * 0.8 image.left = screen.with * 0.8 image.hight = screen.hight * 0.3 image.with = screen.with * 0.3 这段代码放在窗体加载时即可·其它的效仿

大家正在搜

屏幕分辨率和最大分辨率 vb怎么不让窗体改变大小分辨率是屏幕大小吗分辨率跟屏幕大小有关系吗怎么看屏幕分辨率屏幕分辨率怎么算分辨率和屏幕大小计算分辨率大小怎么看屏幕像素和屏幕分辨率