' Place form in bottom left corner of screen
Private Sub cmdBottomLeft_Click()
    frmMove.Top = Screen.Height - frmMove.Height
    frmMove.Left = 0
End Sub

' Place form in bottom right corner of screen
Private Sub cmdBottomRight_Click()
    Me.Top = Screen.Height - Me.Height
    frmMove.Left = Screen.Width - frmMove.Width
End Sub

' Place form in top left corner of screen
Private Sub cmdTopLeft_Click()
    frmMove.Top = 0
    frmMove.Left = 0
End Sub

' Place form in top right corner of screen
Private Sub cmdTopRight_Click()
    Me.Top = 0
    Me.Left = Screen.Width - Me.Width
End Sub