フォームのリサイズについて

マルコ 2002-11-21 19:54:47 No: 105481

フォームのサイズを変更した際に、
内部に貼り付けてあるコントロール（複数）もフォームの大きさに合わせて変更したいのですが、以下のような方法ですべてのコントロールのサイズを変更するしか方法しかないのでしょうか。

Private Sub Form_Resize()
Text1.Move 0, 0, ScaleWidth - 1000, ScaleHeight - 1000
Text2.Move 100, 100, ScaleWidth - 2000, ScaleHeight - 2000
End Sub

ご教授願います。