![]() |
|
طلب مساعدة في جمع مصفوفتين - نسخة قابلة للطباعة +- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb) +-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182) +--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183) +--- الموضوع : طلب مساعدة في جمع مصفوفتين (/showthread.php?tid=17172) |
طلب مساعدة في جمع مصفوفتين - أحمد محمد جمعة - 05-09-16 السلام عليكم ورحمة الله وبركاته
قمت بإضافة مصفوفتين اي عند الضغط علي 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
----------------------------------------------------------------------------------------------------
سامحوني عالإطالة و بارك الله فيكم جميعا وربي يزدكم من علمه ..
RE: طلب مساعدة في جمع مصفوفتين - أبو عمر - 06-09-16 بمان حلقة الدوران ثابتة وبما اني حاولت افهم مطلبك وبما ان المصفوفات في وادي وشغلي في وادي وعلى حسب فهمي جرب الكود ادناه بالنسبة مكان Name تقدر تحط Inputbox لكن على مثالك في الاعلى يستحيل مساواة القيمة العددية ب بالنص اناتج من الرسالة في ال Inputbox PHP كود : Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click |