Как нарисовать круг в Visual Basic

Как нарисовать круг в Visual Basic, чтобы при Private Sub HScroll1_Scroll() точку за точкой становился круг, и обратное при Private Sub VScroll1_Scroll() точку за точкой стирался круг