寻人启事的标准格式:请vb侠哥侠姐帮小弟解释

来源:百度文库 编辑:高考问答 时间:2024/05/06 09:07:05
Private Sub Form_Click()
x = #1/1/2005#
a = x - Date
b = Weekday(x)
c = Year(Date)
d = Month(Date)
e = Hour(Time)
f = Minute(Time)
Print "现在距离2005年元旦还有:"; a; "天"
Print "2005年元旦是:星期"; b - 1
Print "本月份是:"; c; "年"; d; "月"
Print "现在是:"; e; "时"; f; "分"
End Sub

Print "2005年元旦是:星期"; b - 1 就是这句 为什么计算星期几要用b减一下一呢 谢谢

weekday返回的数字代表:1=星期日,2=星期一****7=星期六

因为得出得星期是表示同以星期日以1开始得。