إظهار آخر ثلاث سجلات من جدولفي تقرير

هل من مجيب

تفضل اخي

بهيك ابتعرض اخر 3 سجلات فرز تنازلي بالجريد فيو

وبعد ما ينعرضوا بترحلهم للتقرير

وبعدها ابتطبع

 Dim str As String = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=|DataDirectory|\Database2.accdb"
        Dim con As OleDbConnection = New OleDbConnection(str)
        con.Open()
        Dim cmd As String = "select top 3 * from new1 order by ID desc"
        Dim cmde As OleDbCommand = New OleDbCommand(cmd, con)
        Dim dat As OleDbDataAdapter = New OleDbDataAdapter(cmde)
        Dim dt As DataTable = New DataTable()
        cmde.ExecuteNonQuery()
        dat.Fill(dt)
        DataGridView1.DataSource = dt
        con.Close()