Mengetahui Tanggal Terakhir Bulan Tertentu

Tgl terakhir sangat diperlukan di berbagai pemrograman. Misal, untuk stock opname, atau pembayaran gaji di suatu perusahaan.
Di Visual Basic, cara mendapatkan tanggal bermacam-macam. Cara saya dibawah ini menggunakan kebaikan system.DateTime yang mempunyai fungsi DaysInMonth

Jika Anda menghindari penulisan imports System.DateTime, Anda dapat langsung menuliskannya pada fungsi tersebut. Contoh:

DaysInMonth(thn, bln) 

dapat Anda ganti menjadi:

System.DateTime.DaysInMonth(thn, bln)

Option Strict On Imports System.DateTime Module Module1 Sub Main() Dim TglAkhir, thn, bln As Integer thn = DateAndTime.Year(Today) bln = DateAndTime.Month(Today) TglAkhir = DaysInMonth(thn, bln) Console.WriteLine(" ") Console.Write(" Tanggal Akhir Bulan " + bln.ToString + " Tahun " + thn.ToString + " : ") Console.WriteLine(TglAkhir) Console.Read() End Sub End Module

Mengetahui Tanggal Terakhir Bulan Tertentu 2018-11-07T22:51:00-08:00 Rating: 4.5 Diposkan Oleh: Good Dreamer