[عبد العزيز البسكري]

السلام عليكم و رحمة الله و بركاته

بارك الله فيك و جزاك خير الجزاء أخي الكريم على هذه الدالة و هذا المساعدة .. زادها الله بموازين حسناتك إن شاء الله

فقط لو سمحت هل من الممكن وضعها بنفس ملفي المرفق

لأنّي ربما لم أعرف التعامل معها بشكل سليم

لاحظ أخي الكريم الصورة المؤشّر عليها بالسهم الأحمر و هي الدالة المعنية

نجد أنّ السادس تكرّر 3 مرّات .. 6-6-6 و لذلك من المفروض ألاّ يكون هناك ثامن

كود :

  Dim Cmd = New OleDbCommand("SELECT * From TBL_STUDENT", Conne_2019)
           Dim Da = New OleDbDataAdapter()
           Da.SelectCommand = Cmd
           dt = New DataTable()
           Da.Fill(dt)
           Me.DataGridView2.DataSource = OrdinalingDataTableRows(dt, "STUDENT_Notes", "STUDENT_Ranking")

تحياتي