الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

كيفية استخدام insert في المتغيرات النصية

بدأه iamsad في 8 مايو 2012 · 2 رد · 416 مشاهدة · في Microsoft Visual Basic.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم

لقد استخدمت هذا الكود لكي اجمع النصوص الموجودة في كل ليبل في الفورم

  Dim i As Integer = 0
        For Each ctrl As Label In Me.Controls
            s.Insert(i, ctrl.Text)
            i += 1
        Next
        TextBox1.Text = s

الا انه تظهر لي رسالة خطأ

585705893.png

الا انني لاحظت ايضا ان النص المعمول له insert لا يظل محفوظا في المتغير النصي وهذه مشكلة اخرى فانا اريد كل هذه النصوص ان تجمع في متغير نصي واحد

ارجو ان اكون قد اوضحت

؟؟

يا أهل سوريا اعلنوها خلافة اسلامية لتكون الشام عقر دار المسلمين وخلاص ارض فلسطين

#2

لو أردت جمع كل النصوص من على كل ليبل في تكست بوكس استخدم هذا الكود

Dim s As String = ""
        Dim lbl As Control
        For Each lbl In Controls
            If TypeOf lbl Is Label Then
                s = s + lbl.Text
                s = s + " "
            End If

        Next lbl
        TextBox1.Text = s

تم تعديل هذه المشاركة بواسطة asn في 9 مايو 2012 في 02:14

1
#3

شكرا اخي بارك الله فيك

يا أهل سوريا اعلنوها خلافة اسلامية لتكون الشام عقر دار المسلمين وخلاص ارض فلسطين

مواضيع مشابهة