【实例说明】
    通常情况下，在VB程序中如果调整窗体的大小，控件大小是不变的。本例将以command控件为例，讲解如何实现控件大小随窗体大小的改变而改变。运行程序，调整窗体大小，窗体上的控件也随着变化；单击“退出”按钮，退出程序。

【编程思路】
    在窗体的Resize事件下，使用Move方法使控件移动的宽度、高度如终等于缩放的宽度、高度。

【设计步骤】
    1.新建一个标准工程，创建一个新窗体，默认名为Form1。
    2.在窗体上放置一个CommandButton控件。

    3.源程序  [素材源程序下载]


Private Sub Command1_Click()
        End
End Sub

Private Sub Form_Load()
        '窗体高度等于屏幕高度的六分之一
        Form1.Height = Screen.Height / 6
        '窗体宽度等于屏幕宽度的六分之一
        Form1.Width = Screen.Width / 6
End Sub

'窗体大小变化
Private Sub Form_Resize()
        '控件大小随窗体的改变而改变
        Command1.Move 0, 0, ScaleWidth, ScaleHeight
End Sub