Visual Basic Bir Tarihin Haftanın Hangi Günü Olduğunu Bulma
Visual Basic dilinde bir tarihin haftanın hangi günü olduğu bulmak için DayOfWeek özelliğini kullanırız.
Aşağıdaki örnekte bir tarihin haftanın hangi günü olduğu gösterilmiştir.
Module ModuleTest
Sub Main()
Dim tarih As DateTime = New DateTime(2021, 3, 1)
Console.WriteLine(tarih.DayOfWeek)
Dim tarihTurkce As String = ""
Select Case tarih.DayOfWeek
Case DayOfWeek.Sunday
tarihTurkce = "Pazar"
Case DayOfWeek.Monday
tarihTurkce = "Pazartesi"
Case DayOfWeek.Tuesday
tarihTurkce = "Salı"
Case DayOfWeek.Wednesday
tarihTurkce = "Çarşamba"
Case DayOfWeek.Thursday
tarihTurkce = "Perşembe"
Case DayOfWeek.Friday
tarihTurkce = "Cuma"
Case DayOfWeek.Saturday
tarihTurkce = "Cumartesi"
Case Else
End Select
Console.WriteLine(tarihTurkce)
Console.ReadLine()
End Sub
End Module
DayOfWeek bize İngilizce olarak döner. Daha sonra bunu switch case ile Türkçe 'ye çeviriyoruz ve ekrana yazdırıyoruz.
Not : DayOfWeek her zaman İngilizce sonuç döndürür. Sisteminizin başka bir dil olması, döndüreceği sonucun sistem dilinde olması anlamına gelmez.