Crear un fomulario redondo

Copia el siguiente còdigo en un botòn y crearas un formulario redondo.

Dim shape As New System.Drawing.Drawing2D.GraphicsPath()
shape.AddEllipse(0, 0, Me.Width, Me.Height)
Me.Region = New System.Drawing.Region(shape)