为什么vb获取星期几时要减一

直接参照下面的列表转化就OK了。

假如Weekday(Date)返回3，那么就是 星期二

Weekday 函数
      
返回一个 Variant (Integer)，包含一个整数，代表某个日期是星期几。
语法
Weekday(date, [firstdayofweek])
Weekday 函数语法有下列的命名参数：
部分    描述    
date    必要。能够表示日期的 Variant、数值表达式、字符串表达式或它们的组合。如果 date 包含 Null，则返回 Null。    
Firstdayofweek    可选。指定一星期第一天的常数。如果未予指定，则以 vbSunday 
为缺省值。    

设置
firstdayofweek 参数有以下设定值：
常数    值    描述    
vbUseSystem    0    使用 NLS API 设置。    
VbSunday    1    星期日（缺省值）    
vbMonday    2    星期一    
vbTuesday    3    星期二    
vbWednesday    4    星期三    
vbThursday    5    星期四    
vbFriday    6    星期五    
vbSaturday    7    星期六    

返回值
Weekday 函数可以返回以下诸值：
常数    值    描述    
vbSunday    1    星期日    
vbMonday    2    星期一    
vbTuesday    3    星期二    
vbWednesday    4    星期三    
vbThursday    5    星期四    
vbFriday    6    星期五    
vbSaturday    7    星期六

因为西方习惯是星期日做为一星期开始的第一天，中国是以星期一做为一个星期的第一天。不过现在大部分人都是以星期天做为一星期的第一天了，日历上也是这样显示了。

因为默认的是周日为每星期的第一天
你可以这样改Weekday(Now, vbMonday)，这样就默认周一是每星期的第一天了

0