在FORM的RESIZE事件中设置。也许还有其他窗体的属性可以吧
Private Sub Form_Resize()Text1.Width = Form1.Width / 5Text1.Height = Form1.Height / 5End Sub当然这个比例可以通过程序调整.
