Form Size and Mouse Position

Public Class Form1

    Private Sub Form1_Resize(sender As System.Object, e As System.EventArgs) Handles MyBase.Resize
        ToolStripStatusLabel1.Text = "Size " & Me.Size.Width & " x " & Me.Size.Height & " y px"
    End Sub

    Private Sub Form1_MouseMove(sender As System.Object, e As System.Windows.Forms.MouseEventArgs) Handles MyBase.MouseMove
        ToolStripStatusLabel2.Text = "Mouse Position: " & e.X & " x " & e.Y & " y px"
    End Sub
End Class

'Note
'you need a status strip, and two status labels