Access培训-Access开发平台-Access行业开发
Access交流网(免费Access交流)
QQ:18449932
网 址:www.access-cn.com
正 文:
原表为: 姓名 出海日期 返回日期
转换成:姓名 合计出勤天数 03年1月出勤天数 03年2月出勤天数......
示例下载: 点击浏览该文件
注意:本例中取得月份天数的函数,2月份闰年的判断有误,函数应改为:
'求某月天数Function ts(myday As Date) As Byte ts = DateSerial(Year(myday), Month(myday) + 1, Day(myday)) - myday End Function