Membaca Data pada Record Terakhir dari Database

Seringkali banyak yang menanyakan bagaimana caranya jika ingin membaca data pada record terakhir dari database. Saya menemukan salah satu solusinya jika Anda menggunakan perintah ExecuteReader untuk membaca data pada database.
Berikut ini adalah sepenggal syntax-nya:

dr = cmd.ExecuteReader

Do while dr.read

   Dim nama as string = dr!Nama

   Dim alamat as string = dr!Alamat

Loop

TxtNama.Text = nama

TxtAlamat.Text = alamat

dr.Close()

Penjelasan:

Program akan membaca data nama dan alamat pada record yang telah ditemukan sesuai dengan perintah SQL. Data nama dan alamat akan dideklarasikan ke dalam variabel nama dan alamat. Pada akhir dari proses looping variabel nama dan alamat hanya akan berisi data nama dan alamat yang terdapat pada record terakhir dari database dengan asumsi bahwa semua record sudah tersusun secara ascending.

Perintah SQL TOP
Cara lain untuk menuju ke record terakhir adalah menggunakan perintal SQL TOP.
Berikut ini contoh syntax perintah SQL:

SELECT TOP 1 * FROM STOK WHERE KODE_BARANG = '001' ORDER BY TANGGAL DESC

Penjelasan:
Query akan menampilkan semua field dari 1 record paling atas pada tabel Stok yang memiliki Kode_Barang '001' dimana record tersusun secara descending berdasarkan Tanggal sehingga record terakhir berada pada urutan atas.