اريد مثال على استخدام الداتا جريد داخل الاكسيس

السلام عليكم

ارجو من الاخوة المشرفين وضع مثال يوضح كيفية استخدام تقنية ado داخل الاكسيس و يوضح فية

كيفية عرض البيانات المستخرجة من الجدول فى داتا جريد و شكرا

علما بأنى وجدت اكواد كثيرة لأضافة سجل و منها الكود التالى

Private Sub cmbSubmit_Click()

On Error GoTo Err_cmbSubmit_Click

    Dim rstOrder As ADODB.Recordset
    
    Set rstOrder = New ADODB.Recordset
    
    rstOrder.Open "CustomersOrders", CurrentProject.Connection, adOpenStatic, adLockOptimistic
    If rstOrder.Supports(adAddNew) Then
        With rstOrder
            .AddNew
            .Fields("EmployeeID") = cboEmployeeID
            .Fields("OrderDate") = txtOrderDate
            .Fields("DayOfWeek") = txtDayOfWeek
            .Fields("OrderTime") = txtOrderTime
            .Fields("PeriodOfDay") = txtPeriodOfDay
            .Fields("ContainerID") = cboContainerID
            .Fields("FlavorID") = cboFlavorID
            .Fields("IngredientID") = cboIngredientID
            .Fields("Notes") = txtNotes
            .Update
            cmdReset_Click
        End With
    End If
    
    rstOrder.Close
    Set rstOrder = Nothing
    
 '   DoCmd.Close
    
Exit_cmbSubmit_Click:
    Exit Sub

Err_cmbSubmit_Click:
    MsgBox Err.Description
    Resume Exit_cmbSubmit_Click
End Sub

لكن لم اجد كود يعرض السجلات فى datagride

ارجو المساعدة سريعا