Sub Main()
Dim hari As Byte
Console.Write("masukkan nomor hari:")
hari = Console.ReadLine()
Select Case hari
Case 1
Console.WriteLine("SENIN")
Case 2
Console.WriteLine("SELASA")
Case 3
Console.WriteLine("RABU")
Case 4
Console.WriteLine("KAMIS")
Case 5
Console.WriteLine("JUMAT")
Case 6
Console.WriteLine("SABTU")
Case 7
Console.WriteLine("MINGGU")
Case Else
Console.WriteLine("No hari tidak sah")
End Select
Console.ReadKey()
End Sub
0 komentar:
:a: :b: :c: :d: :e: :f: :g: :h: :i: :j: :k: :l:
Posting Komentar
Silahkan gan komentarnya,,karena komentar anda sangat berarti bagi blog ini...Salam blogger