参考答案：1

解析：[知识点]模块/VBA程序设计基础
[评析]Day(date)，必要的date参数，可以是任何能够表示日期的Variant、数值表达式、字符串表达式或它们的组合。如果date包含Null，则返回Null。
weekday(date)返回一个Variant(Integer)，包含一个整数，代表某个日期是星期几。
语法：
Weekday(date，[firstdayofweek])
firstdayofweek指定一星期第一天的常数。如果未予指定，则以vbSunday为缺省值，即星期日为1，则星期六为7。