概述 Option Explicit Private Sub Form_Click() End End Sub Private Sub Form_Resize() Label1.Left = (Me.Sca