VB6Resizer是一个开源的控件,它的作用是在运行时刻自动对其它可视控件进行动态的位置/大小调整.

其实这个控件实现的功能和VB.Net的窗体布局功能类似. 比如你的窗体中有一个DBGrid控件,占了很大一部分,下边有几个按钮 现在需要窗体的大小可调,以使DBGrid可以看到更多的数据,这样的话,窗体上的控件就都需要调整,不然只有窗体变化,而控件不动的话就达不到预期效果,而且很难看. 原来的方式是在窗口的Resize事件中添加调整控件大小/位置的代码,这样做的话比较麻烦,要自己手动去计算宽度/偏移,然后将这些代码写死在程序中,以后增加控件或者调整布局都需要重新计算/修改代码,不利于维护. 有了这个控件就方便多了,Resize事件中一行代码不用写,只需将这个控件拖动到窗体上,然后设置被调整控件的Tag属性,在运行时刻就可以进行调整了:-)

使用方式

1. 启动VB程序,打开一个工程
2. 按Ctrl+T打开部件对话框
3. 找到并选中VB6ResizerLib后点击确定
4. 将工具箱中新出现的VB6Resizer控件拖动到窗体上即可

被调整控件需要使用Tag属性定义调整规则,方式如下:

• H - 调整高度
• W - 调整宽度
• T - 调整控件与顶部距离
• L - 调整控件与左侧距离

例如"HW"表示自动调整高度和宽度.

 

TL的优先级高于HW,如果Tag同时包含T和H,则仅T有效.

...