الربط بين Textbox و Listbox

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

بسيطه إن شاء الله

اولا عليك عمل مصفوفه لمربعات النص مثل :

Dim txt(3) As TextBox

وبعدها تقوم بتعبئة مربعات النص في هذه المصفوفه

txt(1) = TextBox1
		txt(2) = TextBox2
		txt(3) = TextBox3

Dim i As Integer
		For i = 1 To 3
			txt(i).Text = ListBox1.Items(i - 1)
		Next

في النهاية سيكون لديك كود كالتالي

Public Class Form1

	Dim txt(3) As TextBox

	Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
		txt(1) = TextBox1
		txt(2) = TextBox2
		txt(3) = TextBox3

	End Sub

	Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
		Dim i As Integer
		For i = 1 To 3
			txt(i).Text = ListBox1.Items(i - 1)
		Next

	End Sub
End Class

في VB6 كان هناك طريقة اسهل للتعامل مع مصفوفات الأدوات و لكنها غير موجوده في ال .net

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

تحياتي

بارك الله فيك أخي خلدون.

سأجرب طريقتك هذه إن شاء الله.

أخي خلدون، لقد حدث خطأ أثناء تشغيل البرنامج في السطر البرمجي:

txt(i).Text = ListBox1.Items(i - 1)

و الخطأ هو:

La conversion du type 'DataRowView' en type 'String' n'est pas valide.

أي، أن تحويل العنصر 'DataRowView' إلى 'String' غير ممكن.

شكرا.

حاول استعمال

txt(i).Text = ListBox1.Items(i - 1).Text

أخي خلدون،

لقد استبدل الخطأ السابق بخطئ جديد:

Le membre public 'Text' du type 'DataRowView' est introuvable.

ما معناه: العنصر 'Text' غير موجود

شكرا.

لقد عرفت المشكله

انت لم تستخدم ال Listbox و لكنك تستخدم DataRowView

حاول استعمال اللست وبكس ListBox

أنا مجربها على ال :) List Box

أنا أستعمل listbox1 الذي يأخذ عناصره من قاعدة بيانات Access.

لقد وضعت listbox2 و وضعت عناصره يدويا، و اشتغل الكود الذي أعطيتني إياه.

بصفة عامة، ما أريده هو وضع محتوى قاعدة البيانات في صناديق النصوص.

المثال في المرفقات.

Test.rar

بارك الله فيك.

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

بارك الله فيك أخي خلدون.

لقد غيرت تماما طريقة الحصول على البيانات و ذلك بنقلها مباشرة من DataGridView1 بدل listbox1.

جزاك الله مرة أخرى على المساعدة.