تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] رسم بالحاسوب طريقه رسم نجمه
#1
كود يشرع رسم نجمه 
ي عباره عن نقاط مثل الدائره. ممكن الكود
الرد }}}
تم الشكر بواسطة:
#2
(19-11-16, 12:21 PM)مٌحُمٌدِ الُ ظٌُهرَُه كتب : كود يشرع رسم نجمه 
ي عباره عن نقاط مثل الدائره. ممكن الكود

يعني ايه نجمة مثل الدائرة ؟؟؟  Huh
وضح اكتر 
علي العموم ده كود رسم النجمة
كود :
   Private Sub Form1_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles Me.Paint
       Dim StarObject As Graphics = e.Graphics
       Dim i As Integer
       Dim random As Random = New Random()
       Dim brush As SolidBrush = New SolidBrush(Color.CornflowerBlue)
       Dim xPoints As Integer() = {55, 67, 109, 73, 83, 55, 27, 37, 1, 43}
       Dim yPoints As Integer() = {0, 36, 36, 54, 96, 72, 96, 54, 36, 36}
       Dim star As GraphicsPath = New GraphicsPath()
       StarObject.TranslateTransform(100, 100)
       For i = 0 To 8 Step 2
           star.AddLine(xPoints(i), yPoints(i), xPoints(i + 1), yPoints(i + 1))
       Next
       star.CloseFigure()
       StarObject.FillPath(brush, star)
   End Sub
{‏‏ يَرْفَعِ اللَّهُ الَّذِينَ آمَنُوا مِنكُمْ وَالَّذِينَ أُوتُوا الْعِلْمَ دَرَجَاتٍ‏ }

 " Mohamed M. Bedair     -     " Abu Anas
Genius Live , Egypt
الرد }}}
تم الشكر بواسطة:
#3
شكرا لك وهذا هوا المطلوب
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
Question [VB.NET] مساعده في طريقه الاتصال بالسيرفر ايهما افضل Àhmedsaif500 0 297 10-04-23, 09:45 AM
آخر رد: Àhmedsaif500
  [سؤال] طريقه تسريع build started in vb.net 2010 ahmedramzyaish 1 875 13-02-22, 01:48 AM
آخر رد: mbk2006
  هل من كود او طريقه لفعل هذا خالد كامل1 1 796 25-10-21, 01:25 AM
آخر رد: خالد كامل1
  طريقه عمل كشف حساب لعميل خالد كامل1 10 2,122 15-10-21, 11:23 PM
آخر رد: خالد كامل1
  هل يوجد كود برمجى او طريقه لعمل هذا فى الداتا جريد فيو خالد كامل1 3 1,190 08-10-21, 07:04 PM
آخر رد: خالد كامل1
  طريقه صنع مشغل للقنوات بالفلاش بلاير بالفيجوال بيسك | الرجاء الرد olordhakem20@gmail.com 1 1,117 28-06-21, 08:00 PM
آخر رد: masport tv
  هل من طريقه بسسيطه لتصدير بيانات فى فورم بالادوات الى PDF خالد كامل1 0 904 19-06-21, 08:20 AM
آخر رد: خالد كامل1
  احبتى اريد طريقه سهله لطباعه لوجو شركه الى جميع تقارير الكريستال ريبورت فى مشروع فيجو خالد كامل1 0 1,006 19-06-21, 08:11 AM
آخر رد: خالد كامل1
  [سؤال] عب توجد طريقه للبحث للصور حسن الجلب 1 788 06-02-21, 07:30 AM
آخر رد: معاند الحظ
  [سؤال] هل توجد طريقه الكتابه علي الصور حسن الجلب 3 1,660 20-01-21, 10:57 PM
آخر رد: asemshahen5

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم