WHAT is this???????????????????

Code:
Public Sub Form_Resize()
On Error Resume Next

  Dim FormLeft As Long
  Dim FormTop As Long

  With Main
    FormLeft = .Left
    FormTop = .Top
    .Left = FormLeft
    .Top = FormTop
    .Height = 7515
    .Width = 15870
   End With
 End Sub