vb6.0中如何根据分辨率自动改变窗体中控件的大小

Question

我是在分辨率 1024X768 的分辨率中写的程序，当改变了分辨率（例如：800X600）时，窗体中的控件就溢出窗体了，怎么做个模块让程序在不同的分辨率下，窗体中的控件能自动适应大小，都能在窗体中显示，请各位VB高手帮忙！分数不够可以再加！！！

Answer 1

比如
image.top = screen.hight * 0.8
image.left = screen.with * 0.8
image.hight = screen.hight * 0.3
image.with = screen.with * 0.3
这段代码放在窗体加载时即可·
其它的效仿