السلام عليكم و رحممة الله و بركاته
انا قمت بعمل قاعدة بيانات على اكسس يحتوي على حقلين وقمت بربطها على الفيجوال بيسك دوت نت
و نجحت الفكرة لكن انا اريده مجرد ان يختار اي قيمة من الليست فيو او لست بوكس وتلقائيا بمجرد الاختيار
يضع قيمة الحقل الاول في التيكست بوكس الاول
وقيمة الحقل الثاني داخل التيكست بوكس الثاني
اقتباسDim red As OleDb.OleDbDataReaderPrivate Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim LIST As ListView
Me.OleDbConnection1.Open()
Dim red As OleDb.OleDbDataReader
red = Me.OleDbCommand1.ExecuteReader(CommandBehavior.CloseConnection)
Do While red.Read
ListBox1.Items.Add(red.GetInt32 & vbTab & red.GetString(1))
Loop
red.Close()
Me.OleDbConnection1.Close()
End Sub
