■89851 |
Re[1]: 1ヶ月分の曜日を表示したい |
□投稿者/ shu -(2019/01/08(Tue) 15:14:00)
| ■No89849 (A さん) に返信
表示がどこに対してか分からないのでとりあえずConsole出力。
Dim yr = 2019
Dim mn = 1
Dim dt As New Date(yr, mn, 1)
Do While dt.AddDays(1).Day <> 1
Console.WriteLine($"{dt:d(ddd)}")
dt = dt.AddDays(1)
Loop
|
|