Selasa, 06 Februari 2024

Fungsi Waktu Dan Tanggal Dalam Visual Basic

Now, 

digunakan untuk mendapatkan Tanggal dan Waktu sekarang.

[ VB 6.0 ]

Dim d As String

d = Now

[ VB .NET ]

Dim d As DateTime = DateTime.Now

Dim format As String = "MMM ddd d HH:mm yyyy"

Console.WriteLine(d.ToString(format))


, hasilnya 13/01/2012 1:22:42

Date, 

digunakan untuk mendapatkan Tanggal sekarang.

[ VB 6.0 ]

Dim d As Date

d = Date

[ VB .NET ]

Dim d As DateTime

d = Now.Date


, hasilnya 13/01/2012

Time, 

digunakan untuk mendapatkan Waktu sekarang.

[ VB 6.0 ]

d = Time

[ VB .NET ]

d = Now.ToLongTimeString

, hasilnya 1:22:42

Day(x),

digunakan untuk mengambil nilai Tanggal saja dari x.

[ VB 6.0 ] 

d = Day(#1/13/2012#) 

[ VB .NET ] 

d = #1/13/2012#.Day 

, hasilnya 13

Month(x), 

digunakan untuk mengambil nilai Bulan saja dari x.

[ VB 6.0 ] 

d = Month(#1/13/2012#)

[ VB .NET ] 

d = #1/13/2012#.Month

 , hasilnya 1

Year(x), 

digunakan untuk mengambil nilai Tahun saja dari x.

[ VB 6.0 ] 

d = Year(#1/13/2012#) 

[ VB .NET ] 

d = #1/13/2012#.Year

 , hasilnya 2012

Hour(x), 

digunakan untuk mengambil nilai Jam saja dari x.

[ VB 6.0 ] 

d = Hour(#1:22:42 AM#)

[ VB .NET ] 

d = #1:22:42 AM#.Hour

 , hasilnya 1

Minute(x), 

digunakan untuk mengambil nilai Menit saja dari x.

[ VB 6.0 ] 

d = Minute(#1:22:42 AM#)

[ VB .NET ] 

d = #1:22:42 AM#.Minute

, hasilnya 22

Second(x), 

digunakan untuk mengambil nilai Detik saja dari x.

[ VB 6.0 ] 

d = Second(#1:22:42 AM#)

[ VB .NET ] 

d = #1:22:42 AM#.Second

, hasilnya 42

DateSerial(yearmonthday), 

digunakan untuk menghasilkan Tanggal dari kombinasi x, y, z.

d = DateSerial(2012, 1, 13)

 , hasilnya 13/01/2012

TimeSerial(hourminutesecond), 

digunakan untuk menghasilkan Waktu dari kombinasi hourminutesecond.

d = TimeSerial(1, 22, 42)

 , hasilnya 1:22:42

MonthName(x), 

digunakan untuk mendapatkan nama Bulan dari x.

d = MonthName(2)

 , hasilnya Februari / mengikuti pengaturan Regional Options dalam Windows Control Panel.

WeekdayName(x), 

digunakan untuk mendapatkan nama Hari dari x.

d = WeekdayName(2, 0, vbSunday)

 , hasilnya Senin / mengikuti pengaturan Regional Options dalam Windows Control Panel.


Bibliography:

https://www.dotnetperls.com/

https://ghofarudin.wordpress.com/

https://www.microsoft.com/

Related Post:

Tidak ada komentar:

Posting Komentar

Various Other Posts