رسم خط و استفاده از حلقه for در VB.NET

سلام
دوستان بنده میخوام یک خط در vb.net رسم کنم که بعد همین خط کشیده شده با استفاده از حلقه for حرکت کنه به سمت پایین ِ فرم

Dim i As Graphics = MyBase.CreateGraphics
For i = 12 To 850
(i.DrawLine(Pens.Red, 50, i, 150, i
For t = 1 To 99999
Next t
Next i
End Sub

اگر به جای i در خط سوم مقدار عددی وارد کنم خطو رسم میکنه،اما میخوام بعد از اجرای برنامه خط به سمت پایین بیاد و این عمل مدام تکرار شه
و لطفا راهنمایی کنید که برای رسم دایره باید از چه تابعی استفاده کنم.
ممنون

چگونه چند خط رو رسم کنم و حط های رسم شده رو .....به دلخواه ........انتخاب کنم و تغییر سایز یا جابجا کنم

نقل قول:

---

نوشته شده توسط saeedmassomi

چگونه چند خط رو رسم کنم و حط های رسم شده رو .....به دلخواه ........انتخاب کنم و تغییر سایز یا جابجا کنم

---

سلام
می تونید از کنترل lineshape برای رسم خط استفاده کنید. (در toolbox داخل Visual Basic Power Packs)