+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (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=6754)
كيف اجعل متغير يحمل قيمة متغير آخر بطريقة غير مباشرة ..؟ - عبد الله - 29-10-12
السلام عليكم ورحمة الله وبركاته
إخواني بارك الله لي ولكم في هذه الأيام الطيبة ونفعنا الله وإياكم بكل خير ، وجعلنا من العالمين العاملين ورزقنا الأخلاص في القول والعمل.
أخواني عندي مسألة وهي أني عندي مجموعة من المتغيرات وهي كالتالي :
كود :
a1
a2
a3
a4
a5كود :
For N As Integer = 1 To 5
MsgBox(a & N)
Nextهذه الطريقة لم تفلح معي فما الحل ....؟
كيف اجعل متغير يحمل قيمة متغير آخر بطريقة غير مباشرة ..؟ - mr_mgm - 29-10-12
[COLOR="#000080"]السلام عليكم اخي
اليك طريقه لتنفيذ طلبك
سنعرف مصفوفه من نوع Stringفي التصريحات العامه
كود :
Dim a(5) As Stringسنقوم بأسناد قيم للمصفوفه في Form1_Load
كود :
a(1) = "a1"
a(2) = "a2"
a(3) = "a3"
a(4) = "a4"
a(5) = "a5"ضع هذا الكود في Button
كود :
For N As Integer = 1 To 5
MsgBox(a(N)).ToString()
Nextكيف اجعل متغير يحمل قيمة متغير آخر بطريقة غير مباشرة ..؟ - عبد الله - 29-10-12
السلام عليكم
سبحان الله ، لا أعلم لماذا لم يخطر ببالي المصفوفات علماً بأنها في الحل لمثل هذه الأمور المهمة.
بارك الله فيك أخينا مستر مجم ، ووفقك الله لكل خير .
كيف اجعل متغير يحمل قيمة متغير آخر بطريقة غير مباشرة ..؟ - SaLoOoMX - 29-10-12
لها عده طرق مثل ماذكر الاخ وكلها نفس الحل
كود :
Dim n(4) As String
n(0) = "N1"
n(1) = "N2"
n(2) = "N3"
n(3) = "N4"
n(4) = "N5"
For Each m In n
MsgBox(m)
Nextكيف اجعل متغير يحمل قيمة متغير آخر بطريقة غير مباشرة ..؟ - ahmed salam - 13-11-12
السلام عليكم ورحمة الله وبركاته
اخي الكريم الحل اسهل بكتير من ذالك
كود :
For N As Integer = 1 To 5
MsgBox("a" & N)
Nextالسلام عليكم و رحمة الله و بركاته
كيف اجعل متغير يحمل قيمة متغير آخر بطريقة غير مباشرة ..؟ - sooriaty03 - 13-11-12
ahmed salam كتب :السلام عليكم ورحمة الله وبركاته
اخي الكريم الحل اسهل بكتير من ذالك
كود :
For N As Integer = 1 To 5
MsgBox("a" & N)
Next
بصراحة هذا الكود هو الأصح
لأن تعريف مصفوفة وحجز حيز لها في الذاكرة بدون داعي هذا يعتبر ضعف في البرنامج
هذا رأيي وشكراً جزيلا لكم
كيف اجعل متغير يحمل قيمة متغير آخر بطريقة غير مباشرة ..؟ - sooriaty03 - 13-11-12
ahmed salam كتب :السلام عليكم ورحمة الله وبركاته
اخي الكريم الحل اسهل بكتير من ذالك
كود :
For N As Integer = 1 To 5
MsgBox("a" & N)
Next
بصراحة هذا الكود هو الأصح
لأن تعريف مصفوفة وحجز حيز لها في الذاكرة بدون داعي هذا يعتبر ضعف في البرنامج
هذا رأيي وشكراً جزيلا لكم