منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
سؤال عن الحلقات التكرارية - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (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=23367)



سؤال عن الحلقات التكرارية - الميساني - 17-01-18

السلام عليكم ورحمة الله وبركاته
تحية طيبة الى جميع اعضاء هذا المنتدى الرائع
اخواني لدي مثال هو لو عندي مثلا 3 textbox 5 , lable 12, RichText  Box  الى اخره واريد ان استخدم خاصية (Visible) لهم عن طريق جمل التكرارفكيف ذلك وتحياتي وتقديري للجميع



RE: سؤال عن الحلقات التكرارية - عبدالله الدوسري - 17-01-18

PHP كود :
   Private Sub ControlsVisibility(ByVal Visibility As Boolean)
 
       '-------------------------------
        RichTextBox1.Visible = Visibility
        RichTextBox2.Visible = Visibility
        RichTextBox3.Visible = Visibility
        '
-------------------------------
 
       lable1.Visible Visibility
        lable2
.Visible Visibility
        lable3
.Visible Visibility
        lable4
.Visible Visibility
        lable5
.Visible Visibility
        lable6
.Visible Visibility
        lable7
.Visible Visibility
        lable8
.Visible Visibility
        lable9
.Visible Visibility
        lable10
.Visible Visibility
        lable11
.Visible Visibility
        lable12
.Visible Visibility
        
'-------------------------------
        textbox1.Visible = Visibility
        textbox2.Visible = Visibility
        textbox3.Visible = Visibility
        textbox4.Visible = Visibility
        textbox5.Visible = Visibility
        '
-------------------------------
 
   End Sub 



هذة افضل طريقة 

وإذا كنت تريد عمل حلقة فيجب أن تكون الكنترولات موجودة في مجموعة يمكن الإلتفاف عليها
ممكن لو كنت تريد الإلتفاف على جميع الكنترولات في الفورم أو في إستضافة كنترول معين مثل البانل
أما إذا كنت تريد الإلتفاف على مجموعة محددة فالطريقة التي ذكرتها لك هي أفضل حل

أو بشكل آخر تضيف علامة في خاصية الــ Tag لكل كنترول وتضع قيمة نصية مثلاً : MyCtrl
وتقوم بالإلتفاف على الكل
وتسأل كل كنترول عن هذة العلامة إذا كان يحتوي على العلامة طبق علية ما تريد

مثلاً :
Cntrol.Tag = "MyCtrl"


RE: سؤال عن الحلقات التكرارية - الميساني - 17-01-18

تسلم اخوي عبدالله ربي يحفظك ويزيد من علمك ويرحم والديك في الدنيا والاخرة