Visual Basic.NET - Se borra rectangulo

Saludos a todos, mi problema es que al dibujar un rectangulo en mi form con el objeto Graphics, pero este se borra por ejemplo cuando minimizo el formulario u otra ventana se pone ensima, también cuando se actualiza el formulario, ¿ a que se debe? ¿ como puedo corregirlo?

Este es mi codigo:
Dim Rectangulo As Graphics
Dim PlumaBorde As Pen

PlumaBorde = New Pen(Color.Red, 2)
Rectangulo = Me.CreateGraphics
Rectangulo.DrawRectangle(PlumaBorde, 10,10,100,100)
Rectangulo .Dispose()


Gracias :)

Yo no se en que evento se pone ese codigo, por intuicion lo puse en el paint y no da problemas.

Private Sub Form2_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles Me.Paint
Dim Rectangulo As Graphics
Dim PlumaBorde As Pen

PlumaBorde = New Pen(Color.Red, 2)
Rectangulo = Me.CreateGraphics
Rectangulo.DrawRectangle(PlumaBorde, 10, 10, 100, 100)
Rectangulo.Dispose()
End Sub

Si lo tienes en ese evento tambien puede ser que se contradiga con alguna otra instruccion y ahi es donde se pierde.

Saludos.