الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

انشاء مصفوفة نقط

بدأه OricalcosZy في 16 نوفمبر 2010 · 2 رد · 462 مشاهدة · في Microsoft Visual Basic.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم ورحمة الله تعالى وبركاته

لدي مصفوفتان

الأولى تضم 374 عنصرا تشكل الأحداثيات X (الافاصيل)

الثانية تضم 374 عنصرا تشكل الاحداثيات Y (الاراتيب)

أريد انشاء مصفوفة من نوع Point تضم 374 عنصرا (نقطة) احداثيثها هي عناصر المصفوفة الأولى والثانية

تم تعديل هذه المشاركة بواسطة OricalcosZy في 16 نوفمبر 2010 في 19:57

Zefri Yahya - ArabTeam 2000

tpc7rzy94tx8iduak4b.png

#2

اخي العزيز انا لا انصح باستخدام المصفوفات ببرامجك الجدية استخدم المجموعات اسرع واكثر دينماكية ، قمت باجابتي عن سوالك باستخدام المجموعات والمصفوفات

المجموعات


 Dim x As New List(Of Integer)
        Dim y As New List(Of Integer)
        Dim pts As New List(Of Point)

        For ind As Integer = 0 To x.Count - 1
            Dim newPoint As New Point(x(ind), y(ind))
            pts.Add(newPoint)
        Next
المصفوفات

   Dim x As Integer() = {2, 5}
        Dim y As Integer() = {5, 5}
        Dim pts As Point() = New Point(x.Length - 1) {}
        For ind As Integer = 0 To UBound(x)
            pts(ind) = New Point(x(ind), y(ind))
        Next



      
      

      
    

  

    
    

      
#3
        
        

      
أخي الكريم
شكرا على الاهتمام ....
في المثال الثاني بالمصفوفات لا تحتوي المصفوفة سوى على عنصرين (نقطتين) احداثياتهما هما (5.5) و (5.2)
بينما أنا أنا أريد 374 نقطة احداثياتها عناصر المصفوفتين التاليتين
الأولى (مصفوفة الأفاصيل)
 Dim XMatrix(374) As Integer
  	    	Dim i As Integer
    	For i = 0 To 374
        	XMatrix(i) = -187
        	XMatrix(i) += i
        	ListBox1.Items.Add(XMatrix(i))
    	Next
والثانية (مصفوفة الأراتيب)
 Dim YMatrix(374) As Integer


    	Dim t As Integer
    	For t = 0 To 374
        	YMatrix(t) = f1(XMatrix(t))
        	ListBox2.Items.Add(YMatrix(t))
    	Next

      
      

      
  Zefri Yahya - ArabTeam 2000
tpc7rzy94tx8iduak4b.png
  

    

  

    
    
    
 مواضيع مشابهة