PDA

View Full Version : سوال: سوال در مورد ساخت شکل های خاص



hno2005
پنج شنبه 21 شهریور 1387, 11:31 صبح
سلام
من می خواهم از بیضی و دایره و مستطیل در برنامم استفاده کنم . ولی دیدم در vb.net کنترلی مثل shape وجود نداره . توی msdn هم نوشته از label استفاده کنید که جالب نیست . آیا کنترل یا کامپونتی هست که بتونم مثل shape در vb6 ازش استفاده کنم و شکل های خاص بسازم؟

با تشکر

jas1387
پنج شنبه 21 شهریور 1387, 12:01 عصر
سلام

امیدوار ایم کد بتواند به شما کمک کند




Private Sub Form1_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles Me.Paint
Dim circle_brush As New SolidBrush(Color.Orange)
e.Graphics.FillEllipse(circle_brush, 10, 10, 100, 100)
Dim circle_pen As New Pen(Color.Blue, 10)
e.Graphics.DrawEllipse(circle_pen, 10, 10, 100, 100)
End Sub