VB中,如何让一个控件和窗体一起变大

给你个通用的，自己写的。适用于所有带Move方法的控件。
直接粘贴代码即可。
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
Private Sub Form_Load()
For Each Control In Controls
Control.Tag = Join(Array(Control.Left, Control.Top, Control.Width, Control.Height))
Next
Tag = Join(Array(Width, Height))
End Sub

Private Sub Form_Resize()
Dim sF, sC
sF = Split(Tag)
For Each Control In Controls
sC = Split(Control.Tag)
Control.Move Width / sF(0) * sC(0), Height / sF(1) * sC(1), Width / sF(0) * sC(2), Height / sF(1) * sC(3)
Next
For Each Control In Controls
Control.Tag = Join(Array(Control.Left, Control.Top, Control.Width, Control.Height))
Next
Tag = Join(Array(Width, Height))

End Sub

假设你要改变的控件是text1则加入以下代码:
Private Sub Form_Resize()
Text1.Height = Me.Height
Text1.Width = Me.Width
End Sub

呵呵，这个相关的问题刚刚回答过：

用VB让控件和窗体一起淡入淡出效果 VB中如何让窗体的背景图片随着窗体一起放大,缩小(不另外用图片框之类的控件,因为要在窗体中画时钟) vb中如何使窗体和控件的相对位置不发生改变 VB 窗体和控件的半透明 VB中如何使一个窗体载入时让一个文本框里面有焦点 VB中如何让一窗体在N秒后自动关闭 VB如何让一个控件 重复运动? 请问C#如何在一个类或一个窗体中使用用另一个窗体的控件？ vb中如何将多个窗体中的一个窗体设置为主窗体 如何让VB窗体设值好后,里面的控件会随之变大而不变?