Artikel yang dulu saya tulis berjudul Mencari Minggu Kesekian dalam 1 Bulan berdasarkan Tanggal Tertentu di Visual Basic 6 mendapat tanggapan dengan pertanyaan baru yang intinya menanyakan bagaimana cara mencari tanggal awal dan akhir dalam satu minggu tertentu di suatu bulan, beserta informasi ada berapa minggu dalam satu bulan tersebut. Solusi di artikel ini hampir sama dengan artikel di atas tadi, yaitu sama-sama mengoptimalkan control MonthView untuk memudahkan memahami informasi minggu kesekian dalam satu tahun. Jika ingin menterjemahkan dalam bentuk minggu ke sekian dalam sebulan, maka Anda tinggal memetakan mulai dari minggu pertama sampai minggu terakhir dalam setahun di suatu bulan tersebut menjadi nilai sekuensial yang dimulai dari angka 1 sampai jumlah maksimal minggu keberapa di bulan tersebut dalam sebulan. Berikut ini kode Visual Basic 6 selengkapnya?
Silahkan Login atau registrasi akun untuk membaca artikel ini selengkapnya.
saya mau tanya !!
kalau menampilkan tanggal awal sampai tanggal akhir dalam 1 bulan di listview bagaimana ?
Untuk mengetahui jumlah hari/tanggal dalam satu bulan berdasarkan tanggal tertentu yang diketahui, silahkan ke sini:
http://www.visualbasicindonesia.com/vb6/vb6-date-time/menampilkan-jumlah-hari-di-tanggal-bulan-tertentu-di-visual-basic-6/
sedangkan untuk menampilkan ke control ListView, silahkan ke sini:
http://www.visualbasicindonesia.com/vb6/vb6-control-form/vb6-listbox/menampilkan-data-ke-listview-di-visual-basic-6/
Selamat mengeksplorasi!
Maaf ,saya mau tanya lg !!
saya sudah coba menapilkan’y ,tapi ketika saya coba pakai sintax Sql ,data’y tidak keluar di control listview….
Ini sintax untuk memasukan tanggal awal sampai tanggal akhir…
____________________________________________________
dim sqlstring as string
sqlString = “Select * From TblCek Where TblCek.Tanggal_Jatuh_Tempo = ‘” & LastDayOfMonth(DTPicker1.Value) & “‘” _
& ” and TblCek.Tanggal_Jatuh_Tempo = ‘” & LastDayOfMonth(DTPicker2.Value) & “‘ ORDER BY TblCek.Tanggal_Jatuh_Tempo ASC”
____________________________________________________
Mohon bantuan’y….. ???