قواعد البيانات - عرض السجلات والإضافة والإزالة
في الدرس السابق تعلمنا كيفية عرض البيانات كل سجل لوحده في أدوات Text وعرفنا كيفية الإضافة والحذف والتعديل وكيفية البحث عن سجل.
في درسنا اليوم سوف نتعلم كيفية عرض كافة قاعدة البيانات مرتبة في جدول . ركز معنا من فضلك:
يمكنك عرض البيانات في List Box ولاكن هذه الطريقة ليست جيدة:
في Timer : ضع الكود التالي:
أما هناك ادوات جاهزة لهذه العملية سوف نأخذ الأفضل : Microsoft Data Bound Grid Control أنقر كليك يمين على صندوق الأدوات وإختر Components فيظهر مربع حوار صندوق العناصر الإضافية. سوف تجد الأداة Microsoft Data Bound Grid Contro حدد خانةالإختيار بجانبها وأنقر موافق . بعد أن تظهر الأيقونة على شريط الأدوات. قم بوضعها على الفورم كما يلي. سيكون إسمها DBGrid1
والله ولي التوفيق
Data1.Recordset.MoveNext
List1.AddItem Text1 & \'-----\' & Text2 & \'-----\' & Text3
If Data1.Recordset.EOF = True Then
Timer1.Enabled = False
End If
List1.AddItem Text1 & \'-----\' & Text2 & \'-----\' & Text3
If Data1.Recordset.EOF = True Then
Timer1.Enabled = False
End If
أما هناك ادوات جاهزة لهذه العملية سوف نأخذ الأفضل : Microsoft Data Bound Grid Control أنقر كليك يمين على صندوق الأدوات وإختر Components فيظهر مربع حوار صندوق العناصر الإضافية. سوف تجد الأداة Microsoft Data Bound Grid Contro حدد خانةالإختيار بجانبها وأنقر موافق . بعد أن تظهر الأيقونة على شريط الأدوات. قم بوضعها على الفورم كما يلي. سيكون إسمها DBGrid1
والله ولي التوفيق