VBA Untuk Mencuplik Komponen Tanggal Dalam Format 2 Digit Tanggal Dan 2 Digit Bulan

Niguru.com | Sabtu, 15 Ags 2020 | Melanjutkan penjelasan pada posting sehari sebelumnya yang menjelaskan mengenai cara untuk mencuplik komponen tanggal dengan menggunakan VBA script, maka pada posting kali ini Niguru.com akan menjelaskan cara untuk menghasilkan output yang berbeda.

Pada beberapa kasus seringkali programmer membutuhkan pencuplikan format tanggal dan bulan dalam 2 digit. Misalnya digunakan untuk membuat penomoran otomatis suatu dokumen tertentu.

Berikut ini caranya, mulai dari membuat form untuk uji coba:

1. Jalankan aplikasi MS (Microsoft Access), klik Forms
2. Klik Design
3. Klik Create form in Design view

1. Tambahkan 4 text box (penjelasan detailnya ada pada tabel dibawah)
2. Tambahkan 1 command button dengan nama dan caption = Proses
3. Klik OK untuk menyimpan form

Detail nama field dan teks yang harus ditampilkan pada label setiap field:

Tekan tombol [Alt + F11], untuk membuka VBA Editor, dan ketikkan instruksi:

Private Sub Proses_Click()
Tgl = Format(TglLengkap, "dd")
Bln = Format(TglLengkap, "mm")
Thn = Year(TglLengkap)
End Sub

Simpan hasilnya dan jalankan aplikasi, dengan membuka form, ketikkan sembarang tanggal pada kolom /field Tanggal lengkap.
Lihat hasilnya pada saat tombol Proses ditekan maka tanggal dan bulan yang ditampilkan adalah tanggal dan bulan dalam format 2 digit.

Demikianlah cara untuk membuat cuplikan komponen tanggal dan bulan dalam format 2 digit.
Selamat mencoba .. Have a nice day :-)

www.Niguru.com (Nino Guevara Ruwano)