تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
كيف يتم تنفيذ امر علي مجموعة عناصر مرة واحدة
#1
كيف يتم تنفيذ امر علي مجموعة عناصر دفعة واحدة
يعني لو مثلا كود زي ده
        My.Settings.textsave = TextBox1.Text
عايز اخلية ينفذة علي مجموعة textboxs مرة واحدة دون كتابة اسمائهم واحد واحد

اريد تنفيذة علي 10 تيكست بوكس مثلا
from textbox1.text to textbox10.text
الرد }}
تم الشكر بواسطة:
#2
السلام عليكم ورحمة الله وبركاته
أخي الكريم ضع مثال مع اسماء المتغيرات التي أنشأتها في  Settings ليصار الى التعديل

السلام عليكم 
تفضل اخي الكريم
كود :
 Private Sub Form1_FormClosing(sender As Object, e As FormClosingEventArgs) Handles MyBase.FormClosing
       Dim MyVar() As String = {"MyVar1", "MyVar2", "MyVar3", "MyVar4"} ' مصفوفة اسماء المتغيرات في السيتينغ
       Dim Mytxt() As TextBox = {TextBox1, TextBox2, TextBox3, TextBox4} ' مصفوفة اسماء التكست بوكس
       For i As Integer = 0 To MyVar.Length - 1
           Dim MyV As String = MyVar(i)
           My.Settings.Item(MyVar(i)) = Mytxt(i).Text
           My.Settings.Save()
       Next
   
   End Sub

   Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
       TextBox1.Text = My.Settings.MyVar1
       TextBox2.Text = My.Settings.MyVar2
       TextBox3.Text = My.Settings.MyVar3
       TextBox4.Text = My.Settings.MyVar4
   End Sub
اعمل الخير وأجرك لا تنتظره فالله خير من إليك يرده
البرمجة ليست مجرد كود بل هي منهج تفكير منطقي لحل المشكلات







الرد }}
تم الشكر بواسطة: asmarsou , ابو روضة , مصمم هاوي , مصمم هاوي
#3
شكرا اخي الفاضل

إستفسار أخر

لو عايز اعمل زر يمسح كل التيكست بوكس مرة واحدة

TextBox1.Text = ""

لو عايز اخلية لكذا تيكست بوكس
ما الكود ؟؟
الرد }}
تم الشكر بواسطة:
#4
السلام عليكم ورحمة الله وبركاته
تفضل اخي الكريم
كود :
   Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       For Each C As Control In Me.Controls
           If TypeOf C Is TextBox Then
               C.Text = ""
           End If
       Next
   End Sub
اعمل الخير وأجرك لا تنتظره فالله خير من إليك يرده
البرمجة ليست مجرد كود بل هي منهج تفكير منطقي لحل المشكلات







الرد }}
#5
(08-02-22, 10:52 PM)Han2022 كتب : شكرا اخي الفاضل

إستفسار أخر

لو عايز اعمل زر يمسح كل التيكست بوكس مرة واحدة

       TextBox1.Text = ""

لو عايز اخلية لكذا تيكست بوكس
ما الكود ؟؟

تفضل

كود :
For Each ctrl As Control In Me.Controls
           If TypeOf ctrl Is TextBox Then
               ctrl.Text = ""
           End If
       Next
الرد }}
تم الشكر بواسطة: ابراهيم ايبو , ابراهيم ايبو
#6
بارك الله فيك على المجهود الكبير و الرائع
الرد }}
تم الشكر بواسطة: asmarsou


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  تشغيل البرنامج ككتلة واحدة mohamedassim 5 221 10-08-22, 11:26 PM
آخر رد: yassoo1985
  جلب عناصر قائمة فرعية في MenuStrip ابراهيم ايبو 4 238 09-08-22, 01:08 AM
آخر رد: Taha Okla
  التحقق من تنفيذ عمليتان في نفس الوقت أو إلغائهما معتز حسن 7 311 17-07-22, 12:48 AM
آخر رد: معتز حسن
  [سؤال] كيفية حفظ عناصر في مجلد بحسب ترتيبها في الليست بوكس asmarsou 1 210 13-07-22, 06:42 PM
آخر رد: ابراهيم ايبو
  خطأ في تنفيذ الكود mohamedassim 5 274 01-07-22, 08:57 PM
آخر رد: سعود
  [سؤال] ربط مجموعة بيانات بقسم معين للطباعة safralfahd 2 346 11-06-22, 01:59 AM
آخر رد: mrfenix93
  هل استطيع اضافة عدد 2 من السوتش في شبكة واحدة بسام محمدغانم 2 298 03-06-22, 04:49 PM
آخر رد: بسام محمدغانم
  [سؤال] حساب زمن تنفيذ برنامج thalji1969 1 329 02-06-22, 01:57 PM
آخر رد: معاند الحظ
  حفظ عناصر listbox في مستند نصي dasktop 1 311 08-05-22, 08:32 PM
آخر رد: سعود
  كيف يمكن اضافة عناصر للكومبوبوكس اثناء تشغيل البرنامج عن طريق المستخدم haithammoftah 1 896 09-04-22, 02:15 AM
آخر رد: asmarsou

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


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