Public Class frmLeer
    Private Sub frmLeer_Load(sender As Object, e As EventArgs) Handles Me.Load
        '  Me.Location = New Point(MousePosition.X - Me.Size.Width / 2, MousePosition.Y - Me.Size.Height / 2)
    End Sub
End Class