Visual Basic

[win47]

помогите пожалуйста надо написать программу для определения дня недели

[gaw4]

в такой постановке это вряд ли
какой бейсик
полное условие задачи --- исходя из чего определить

[DiemonStar]

на VBA:

Sub hh()
  S = [WeekDay(Now(), 2)]
  MsgBox S
End Sub

или так:

Sub hh()
  S = Fix(Now() - 1) Mod 7
  MsgBox S
End Sub