vb程序如何让设计好的程序，自动适应各种分辨率的屏幕？

简单的如下【文本框为最大屏幕长宽】：
text1.width=screen.width
text1.height=screen.height

如果很多控件的话，这样做就很麻烦。。。我看别人的思路是调整系统分辨以适应软件，退出后再调回原来的分辨率。版主这个要怎么操作？

定义一个全局变量用来保存缩放倍数，当窗体大小改变时，用For Each Obj In frmMain ..... Next 语句来缩放每一个控件。

布局代码化

编写一个过程，在这个过程中获取系统分辨率，根据分辨率设置窗体大小、各控件的位置、大小，如果是数组控件可以使用循环，可以说没有捷径。
缺点是根据显示器的大小不同，可能会出现有些控件显示失真的问题，看起来很不舒服，我给很多朋友做过一些程序，一般不会这样做的。