eugene007
asked on
Day
I am looking for a code that enable me to retrieve the
day. For example monday, tuesday till sunday. How is it
done?.
Regards
Eugene
day. For example monday, tuesday till sunday. How is it
done?.
Regards
Eugene
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Hi,
As per Dhaest comment,
Msgbox Format(Date,'dddd')
will work Very Finely
As per Dhaest comment,
Msgbox Format(Date,'dddd')
will work Very Finely
Put this code in a form:
Code:
Option Explicit
Dim MySentence(6)
Dim MyDayWeek
Dim Msg
Private Sub Form_Activate()
MySentence(0) = "Today is My First day"
MySentence(1) = "Today I'm Worried"
MySentence(2) = "Today I Feel Good"
MySentence(3) = "Today I'm Much Better"
MySentence(0) = "Today Im Great"
MySentence(5) = "Today is my Day"
MySentence(6) = "Today is to Rest"
MyDayWeek = Weekday(Date)
Msg = MsgBox(MySentence(MyDayWee
End
End Sub