What the New StartUpPosition Property Replaces; Centering a Form

'The following has been replaced with the StartUpPosition 'property where StartUpPosition = vbCenter can 'be set at design time or runtime:

Public Sub basFrmCenter(ByRef Frm As Form)

    With Frm
        .Move (Screen.Width - .Width) / 2, _
            (Screen.Height - .Height) / 2
    End With

End Sub

mod date: 1999-04-04T07:21:15.000Z