تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
إضافة فيئات الى مصفوفه الرجاء المساعده
#1
السلام عليكم ورحمة الله وبركاته

هل من الممكن إضافة فيئات لمصفوفه والتحكم بها من المصفوفه يعني مثلآ
كود :
Dim txt1, txt2 As New TextBox
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        If txt1.Text <> "" Then
            'اضف الفئه الى مصفوفه
        End If
    End Sub
وبحيث استطيع التحكم ب txt1 مثل اللست تأخذ item معين
الرد }}}}
تم الشكر بواسطة:
#2
لم أفهم المطلوب تحديداً لكن لو تريد إنشاء مصفوفة
كود :
Dim strArr As String() = New String() {}
أو
كود :
Dim strArr As String() = {"Item1", "Item2", "Item3"}
و للإضافة
كود :
ReDim Preserve strArr(strArr.Length)
strArr(strArr.Length - 1) = "ItemToAdd"
للتعديل
كود :
strArr(0) = "Edited Item At 0 Index"

أما لو أردت إنشاء List (و أنصحك بها لسهولة التعامل معها)

كود :
Dim strLst As New List(Of String)
للإضافة
كود :
strLst.Add("ItemToAdd")
للتعديل
كود :
strLst(0) = "Edited Item At 0 Index"
الرد }}}}
تم الشكر بواسطة:
#3
لا اخي لنفترض ان عندي هذي المتغيرات
كود :
Dim txt0 As New TextBox
    Dim txt1 As New TextBox
    Dim txt2 As New TextBox
    Dim txt3 As New TextBox
    Dim txt4 As New TextBox
واردت وضع شرط لجميع النصوص بحيث النص الي ما فارغ ينضاف الى مصفوفه
كود :
If txt1.Text <> "" Then
            'add txt1 to Array
        End If
وعند استدعاء النصوص يتم من خلال الرقم في المصفوفه يعني مثلآ
كود :
Array.Item(0).Text = ""
حيث رقم 0 تمثل الفئه نفسها وهي ال txt1
وبمعنى اصح كأني عرفت النصوص بهالشكل
كود :
Dim txt(5) As TextBox
لكن ما اريد تكون بهالشكل
الرد }}}}
تم الشكر بواسطة:
#4
هل هذا هو المقصود؟
كود :
Dim strArr As String() = {"A", "B", "C"}
Dim str As String = String.Concat(strArr) 'Now str = "ABC"
الرد }}}}
تم الشكر بواسطة:
#5
جزاك الله خير اخي على ردك
انا ماصرحت عن string صرحت عن صندوق نص
[COLOR="#0000FF"]Dim txt0 As New TextBox
Dim txt1 As New TextBox
Dim txt2 As New TextBox
Dim txt3 As New TextBox
[/COLOR]
الرد }}}}
تم الشكر بواسطة:
#6
كود :
[b][SIZE=4][COLOR=#000080]
Dim strArr As String() = {txt0.Text, txt1.Text, txt2.Text, txt3.Text}
Dim str As String = String.Concat(strArr)[/COLOR][/SIZE][/b]
الرد }}}}
تم الشكر بواسطة:
#7
لا اخي ما هذا طلبي
Array.Item(0).Text = "aaa"
يعني الـ txt1,txt2,txt3,......الخ هي المصفوفه وليس نصها واعتقد يتم عمل ذلك في Collection
الرد }}}}
تم الشكر بواسطة:
#8

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





شوف هذا المثال (المعذرة غير متفرغ للمتابعة)

PHP كود :
Public Class Form1

    
Private txt As New List(Of TextBox)

    Private 
Sub Button1_Click(ByVal sender As System.ObjectByVal e As System.EventArgsHandles Button1.Click

        Dim tb 
As New TextBox
        txt
.Add(tb)

        
txt.Item(0).Text "AboRead"

        
MsgBox(txt.Item(0).Text)

    
End Sub

End 
Class 





السلام عليكم ورحمة الله وبركاته
 
 
@@@ سامحوني، منقطع نهائياً @@@

 
الرد }}}}
تم الشكر بواسطة:
#9
[COLOR="#800000"]جزاك الله خير استاذي ابو رائد وهو المطلوب
وجزاك الله خير اخوي Aly El-Haddad على المساعده[/COLOR]
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
Thumbs Up برنامج إدارة الجمعيات الخيرية مفتوح المصدر... الرجاء المساعدة Arabia 42 1,310 منذ 3 ساعة مضت
آخر رد: tryold
  [VB.NET] المساعده في حذف سطر من CVS dubai.eig 0 46 01-12-16, 07:43 PM
آخر رد: dubai.eig
  إضافة مسار لمستند الوورد للوصول إليه بشكل أسرع أبووسم 4 131 10-11-16, 10:32 PM
آخر رد: أبووسم
  [VB.NET] اريد إضافة صورة للموظف في جدول أخر بنفس قاعدة البيانات أبووسم 8 275 05-11-16, 12:00 PM
آخر رد: Adrees
Exclamation الرجاء المساعدة : كيف اخفى او اشفر كلمة السر لقاعدة بيانات من ملف App.config noway 2 92 28-10-16, 07:58 PM
آخر رد: noway
  كيفية إضافة فورم داخل بانل في الفورم الرئيسي bidaya 4 130 21-10-16, 04:40 AM
آخر رد: silverlight
  [VB.NET] ارجو المساعده فى برنامج لاداره الاقساط الشهريه فارس الاحلام 0 88 29-09-16, 06:48 PM
آخر رد: فارس الاحلام
  [VB.NET] الفزعة ياجماعة الخير ... إضافة Parameter لل sqlcommadn superawdi 6 201 22-09-16, 12:01 AM
آخر رد: ابراهيم النعيمي
Heart [VB.NET] الرجاء المساعدة .. استرجاع صورة من قاعدة بيانات ميكروسوفت SQL بـ الـ VB.Net superawdi 5 247 20-09-16, 01:42 AM
آخر رد: superawdi
  الرجاء عمل تقرير للنموذج المرفق haiderkh 8 180 17-09-16, 12:35 AM
آخر رد: ابو ليلى

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


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