17-10-12, 05:15 PM
كاتب الموضوع : AhmedEssawy
كود لاضافة بيانات حقل معين في قاعدة البيانات الى عنصر list*كود برمجي*
بواسطه الاخ
mejahed11
--------------------------------------------------------------------------------
VB.Net
كود :
Private Sub Form_Activate()
Dim a As String
Do While Not Data1.Recordset.EOF = True
a = Data1.Recordset.Fields("name").Value
' هنا تمثل اسم الحقل في قاعدة البيانات name كلمة
List1.AddItem a
Data1.Recordset.MoveNext
Loop
End Sub