تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
طلب مساعدة في جمع مصفوفتين
#1
السلام عليكم ورحمة الله وبركاته 

 قمت بإضافة مصفوفتين اي عند الضغط علي  Button1 تظهر مصفوفة رقم 1 في  Label1  ,  و عند الضغط علي  Button2 تظهر مصفوفة رقم 2 في  Label2


اريد عند الضغط علي Button3  يقوم بجمع  المصفوفة رقم 1 + المصفوفة رقم2  ويظهر الناتج في lable3 

كود المصفوفة رقم 1 
Private Sub Button1_Click_1(sender As Object, e As EventArgs) Handles Button1.Click
        Dim i, j As Integer
        Dim Number(2, 3) As Integer

        For i = 0 To 2 Step 1
            For j = 0 To 3 Step 1
                Number(i, j) = i + j
            Next
        Next


        For i = 0 To 2

            For j = 0 To 3

                Label1.Text = Label1.Text & Number(i, j) & "  "
            Next
            Label1.Text = Label1.Text & vbCrLf & vbCrLf
        Next

    End Sub
---------------------------------------------------------------------------------------------------------------------
كود المصفوفة رقم 2 
Private Sub Button2_Click_1(sender As Object, e As EventArgs) Handles Button2.Click
        Dim i, j As Integer
        Dim Number(2, 3) As Integer

        For i = 0 To 2 Step 1
            For j = 0 To 3 Step 1
     
  Number(i, j) = InputBox("أدخل اسم الطالب", "بيانات الطلبة", "......")
            Next
        Next


        For i = 0 To 2

            For j = 0 To 3

                Label2.Text = Label2.Text & Number(i, j) & "  "
            Next
            Label2.Text = Label2.Text & vbCrLf & vbCrLf
        Next
    End Sub
End Class


----------------------------------------------------------------------------------------------------
كود جمع المصوفتين يكون في   Button3
Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click

    End Sub


----------------------------------------------------------------------------------------------------

 سامحوني عالإطالة و بارك الله فيكم جميعا  وربي يزدكم من علمه ..
الرد }}}}
تم الشكر بواسطة:
#2

بمان حلقة الدوران ثابتة
وبما اني حاولت افهم مطلبك
وبما ان المصفوفات في وادي وشغلي في وادي
وعلى حسب فهمي
جرب الكود ادناه
بالنسبة مكان
Name
تقدر تحط
Inputbox
لكن على مثالك في الاعلى يستحيل مساواة القيمة العددية ب بالنص اناتج من الرسالة في ال
Inputbox


PHP كود :
Private Sub Button1_Click(sender As System.ObjectAs System.EventArgsHandles Button1.Click
        Label1
.Text ""
        
Label2.Text ""
        
Label3.Text ""
        
Dim iAs Integer
        Dim Number
(23) As Integer
        Dim tot
(23) As Integer
        
For 0 To 2 Step 1

            
For 0 To 3 Step 1
                Dim l 
As Integer 1
                Number
(ij) = j
                tot
(ij) = (j) * 2
                Label1
.Text Label1.Text Number(ij) & "  "
                
Label2.Text Label2.Text Number(ij) & "  "

                
Label3.Text Label3.Text "Name  = " tot(ij) & " : "
            
Next
            Label1
.Text Label1.Text vbCrLf
            Label2
.Text Label2.Text vbCrLf
            Label3
.Text Label3.Text vbCrLf
        Next
    End Sub 
سبحان الله والحمدلله ولا إله إلا الله والله أكبر
 رَبِّ اغْفِرْ لِي وَلِوَالِدَيَّ
Heart
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  مساعدة فى انشاء نظام تسجيل و تسحيل الدخول Mohamed20 2 89 15-01-17, 11:48 PM
آخر رد: Mohamed20
  [VB.NET] مساعدة في قراءة داتابيس اكثر من نسخة للبرنامج 0theghost0 9 125 13-01-17, 10:44 AM
آخر رد: 0theghost0
Heart [VB.NET] احتاج الى مساعدة في برنامج لمحل لحساب الفاتورة malek369 0 76 05-01-17, 09:50 AM
آخر رد: malek369
  مساعدة لو سمحتو (طريقة تحريك صورة من خلال احداثيات موجودة في ملف نصي بدون ازرار) marten363 3 86 27-12-16, 08:20 PM
آخر رد: مساعدة
  [VB.NET] مساعدة في تحويل كود من php الى vb.net dubai.eig 8 147 23-12-16, 01:29 AM
آخر رد: dubai.eig
  مساعدة في حساب الدائن والمدين وايجاد الرصيد alwasela 5 199 17-12-16, 09:57 AM
آخر رد: محمود بكرى
  [VB.NET] مساعدة بمشروع توزيع الشفتات (النوبات) اليومية omran.a 0 65 14-12-16, 04:29 PM
آخر رد: omran.a
  ارسال ايميل في vb.net مساعدة nabilelk 2 103 10-12-16, 02:40 PM
آخر رد: hassan
Star [VB.NET] السلام عليكم اخوتي ف المنتدى احتاج الي مساعدة انا اصمم منظومة لشؤون العاملين بعد اض fatma anari 2 156 04-12-16, 11:04 AM
آخر رد: أبوبكر سويدان
  طلب مساعدة ناتج طرح عددين قيمة سالبه khalaroy 2 101 01-12-16, 03:09 AM
آخر رد: khalaroy

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


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