Private Sub Form_Resize()Label2.Move Me.ScaleWidth / 2 - Label2.Width / 2, Me.ScaleHeight / 2 - Label2.Height / 2End Sub
