تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
مساعدة من فظلكم
#1
كود :
Private Sub PictureBox1_Paint(ByVal sender As System.Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles PictureBox1.Paint

       Dim shape As New System.Drawing.Drawing2D.GraphicsPath
       shape.AddEllipse(0, 0, PictureBox1.Width, PictureBox1.Height)
       PictureBox1.Region = New System.Drawing.Region(shape)

   End Sub
هذا كود لجعل الادات بيكتر بوكس دائرية
اريد كود لجهل الادات   مكعبة   بالشكل التالي     [صورة مرفقة: 08-07-2016_21-33-47]

وشكرا
الرد }}}
تم الشكر بواسطة:
#2
يا بدايا،

هذا الكود في حدث Paint للأداة المستهدفة
PHP كود :
Dim path As New System.Drawing.Drawing2D.GraphicsPath

Dim rect 
As Rectangle sender.Bounds
Dim ang 
As Integer 10

path
.AddPolygon(New Point() {
 
               New Point(ang0),
 
               New Point(rect.Width0),
 
               New Point(rect.Width angrect.Height),
 
               New Point(0rect.Height)})

sender.Region = New System.Drawing.Region(path

صورة لتوضيح احداثيات النقاط ومكانها في الكود بالاضافة لمقدار زاوية الميل
الرد }}}
تم الشكر بواسطة: Amir_Alzubidy , khodor1985 , khodor1985
#3
اخي الوادي الشكر قليل عليك ادعو الله ان يجعلها لك في ميزان الحسنات وان يرزقك الجنةو يرحم والديك
وشكرا لك
الرد }}}
تم الشكر بواسطة: الوادي


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] مساعدة في تقرير mrfenix93 1 41 24-03-24, 10:29 PM
آخر رد: mrfenix93
  مساعدة jalaltech 1 95 07-03-24, 07:38 PM
آخر رد: قناص المدينة
  [VB.NET] مساعدة فى كود فاتورة اللكترونية asdfar1977 2 194 02-03-24, 02:00 AM
آخر رد: asdfar1977
  مساعدة فى كود فاتورة الكترونية asdfar1977 0 79 29-02-24, 07:14 PM
آخر رد: asdfar1977
  مساعدة jalaltech 0 133 17-02-24, 02:15 AM
آخر رد: jalaltech
  طلب مساعدة AHMED213 3 323 06-02-24, 09:39 PM
آخر رد: AHMED213
  [VB.NET] طلب مساعدة AHMED213 0 219 31-01-24, 12:56 AM
آخر رد: AHMED213
  طلب مساعدة بخصوص كود الطباعة paveldida 2 461 19-01-24, 12:00 AM
آخر رد: العتيق
  [VB.NET] مساعدة في استدعاء البيانات معينه من form الأول إلى form 2 بدون التعديل loay775 2 272 18-01-24, 05:04 PM
آخر رد: loay775
  اريد مساعدة في العملية الحسابية melad2002 3 406 29-12-23, 09:10 PM
آخر رد: melad2002

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


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