Menentukan Nama Hari Menggunakan DateTimePicker

Jika Anda menggunakan DateTimePicker dan ingin mengetahui apakah pada tanggal tertentu merupakan hari tertentu (misalnya hari Minggu), kita dapat menggunakan DayOfWeek. Berikut ini adalah sepenggal syntax-nya:

If DateTimePicker1.Value.DayOfWeek = 0 Then
   MessageBox.Show("Hari ini adalah hari Minggu.")

Else
   MessageBox.Show("Hari ini bukan hari Minggu tetapi hari " + DateTimePicker1.Value.DayOfWeek.ToString)
End If

Keterangan:

DayOfWeek menggunakan angka integer untuk menentukan nama hari dimulai dari 0 yang menunjukkan hari Minggu sampai dengan 6 untuk hari Sabtu.

Pembulatan Angka pada VB Net

Jika Anda ingin membulatkan hasil dari perhitungan menjadi berapa desimal di belakang koma gunakan fungsi Round pada VB Net.

Imports System.Math
Dim Hasil as Decimal = Round(nilai, digit)

Keterangan:

Pertama kali Anda harus mengimpor komponen yang diperlukan agar fungsi Round dapat berjalan, yaitu System.Math

Nilai berisi angka yang ingin dilakukan pembulatan sedangkan Digit berisi berapa digit angka di belakang koma yang diinginkan.

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.