Visual Basic- Program "o wszystkim i o niczym"

Private Sub Form_Load() Dim Dzien As Integer Dzien = DatePart("w", Date) Select Case Dzien Case 1 lblDni.Caption = "Niedziela, jutro ch... poniedziałek" Case 2 lblDni.Caption = "Dzisiaj jest poniedziałek, początek wspaniałego tygodnia" Case 3...