VB窗体控件大小随窗体大小变化而变化

资源下载地址：点击下载

大家可能在编程时经常遇到的一个问题是设体好的窗体最大化后，窗体的控件并没有随窗体的变大而按相应比例变化，最近在网上发现了一段代码，在VB模块中加入代码，再在窗体后台代码调用一下就能实现这个令大家头疼的问题。

我们设计了2个窗体form1和form2,其中form1没有调用代码，而form2调用了module代码，所以当form1最大化时窗体上按钮的位置是没有变化的，而form2则不一样了，完全按比例放大

以下是form2窗体中加入的调用代码

Public Sub Resize_ALL(Form_Name As Form)

Dim OBJ As Object
For Each OBJ In Form_Name
    ResizeControl OBJ,Form_Name
Next OBJ

End Sub

在module定义了很多函数，而Resize_ALL函数则对每一个功数的功能实现进行遍历进而实现按比例放大功能,模块中的代码比较复杂，大家可以不用读懂，只要记得在窗体中加入以上代码就可以了

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!