Public Sub Example13()
  
  Paint.MoveTo(50, 75)
  Paint.LineTo(200, 75)
  
  Paint.MoveTo(50, 125)
  Paint.LineTo(200, 125)
  
  Paint.MoveTo(50, 175)
  Paint.LineTo(200, 175)
  
  Paint.LineWidth = 30
  Paint.LineCap = Paint.LineCapRound
  Paint.Stroke
  
End
