Ketika data dari tabel akan ditampilkan, sebenarnya Anda bisa langsung mengurutkan datanya sesuai field / kolom yang diinginkan baik secara Ascending (A-Z) maupun secara Descending (Z-A).
Proses mengurutkan ditentukan perintah “ORDER BY” yang dimasukkan dalam SQL-nya. Berkut contoh kode yang akan mengurutkan Tabel Siswa dari field Nama secara Ascending :
Dim ConString As String
ConString = "Provider= Microsoft.ACE.OLEDB.12.0; Data Source= D:\ContohData.accdb"
Dim CmdString As String
CmdString = "SELECT * FROM tblSiswa ORDER BY Nama"
Dim Adp As New OleDb.OleDbDataAdapter(CmdString, ConString)
Dim DT As New DataTable
Adp.Fill(DT)
'menampilkan ke DataGridView1
DataGridView1.DataSource = DT
Dan jika Anda ingin mengurutkan secara Descending, cukup tambahkan “DESC” setelah field-nya.
Jadi Anda cukup mengganti baris kode perintah SQL yang ini :
CmdString = "SELECT * FROM tblSiswa ORDER BY Nama"
Dengan kode yang ini :
CmdString = "SELECT * FROM tblSiswa ORDER BY Nama DESC"
Anda juga bisa mengurutkan berdasarkan lebih dari satu field. Contoh misalnya mengurutkan berdasarkan field Nilai tertinggi dan field Nama, caranya cukup mengganti baris kode kode perintah SQL yang ini :
CmdString = "SELECT * FROM tblSiswa ORDER BY Nama"
Dengan kode yang ini :
CmdString = "SELECT * FROM tblSiswa ORDER BY Nilai DESC, Nama"
Tidak ada komentar