vb6 intercettare evento vbmaximized

[piter123]

salve, vorrei intercettare l'evento vbmaximized di una form figlia in una MDI, nel senso che quando premo il relativo pulsante sulla barra della form questa anzichè ingrandirsi a tutto schermo si modifichi alle dimensioni che io voglio dargli.
Ho scritto questo ma mi dà errore

Codice: Seleziona tutto

Private Sub Form_Resize()
        If Me.WindowState = vbMaximized Then
                Me.Top = 0
                Me.Left = 500
                Me.Height = 1500
                Me.Width = 6000
         End If
End Sub