accessmonth函数⽤法_MicrosoftAccess时间函数汇总
1.Cdate(⽇期表达式)将⽇期表达式转换成⽇期类型的数据。⽇期表达式是任何可以解释成⽇期的表达式，包含⽇期⽂字，可以看作⽇期的字符串以及从函数返回的⽇期。⽐如：myDate = CDate("99-5-20") ，这样的⽇期表达式必须加双引号，否则结果不可预料。CDate 依据系统上的区域设置来决定⽇期的格式。如果提供的格式为不可识别的⽇期设置，则不能正确判断年、⽉、⽇的顺序。
2.Now()返回当前计算机系统设置的⽇期和时间。
3.Year(⽇期表达式)返回表⽰年份的整数。⽐如：Year("00-6-15") = 2000
4.Month(⽇期表达式)返回 1 到 12 之间的整数，表⽰⼀年中的某⽉。⽐如：Month("00-6-15") = 6
5.DateAdd(interval, number, date)DateAdd 函数语法中有下列命名参数：部分 描述interval 必要。字符串表达式，是所要加上去的时间间隔。number 必要。数值表达式，是要加上的时间间隔的数⽬。其数值可以为正数(得到未来的⽇期)，也可以为负数(得到过去的⽇期)。date 必要。Variant (Date) 或表⽰⽇期的⽂字，这⼀⽇期还加上了时间间隔。设置 interval 参数具有以下设定值：设置 描述yyyy 年q 季m ⽉y ⼀年的⽇数d ⽇w ⼀周的⽇数ww 周h 时n 分钟s 秒说明可以使⽤ DateAdd 函数对⽇期加上或减去指定的时间间隔。例如，可以⽤ DateAdd 来计算距今天为三⼗天的⽇期；或者计算距现在为 45 分钟的时间。
为了对 date 加上“⽇”，可以使⽤“⼀年的⽇数”(“y”)，“⽇” (”d”) 或“⼀周的⽇数” (”w”)。DateAdd 函数将不返回有效⽇期。在以下实例中将 1 ⽉31 ⽇加上⼀个⽉：DateAdd(m, 1, 31-Jan-95)上例中，DateAdd 返回 1995 年 2 ⽉ 28 ⽇，⽽不是 1995 年 2 ⽉ 31 ⽇。如果 date 是 1996 年 1 ⽉31 ⽇，则由于 1996 年是闰年，返回值是 1996 年 2 ⽉ 29 ⽇。如果计算的⽇期超前 100 年(减去的年度超过 date 中的年份)，就会导致错误发⽣。如果 number 不是⼀个 Long 值，则在计算时取最接近的整数值来计算。注意 DateAdd 返回值的格式由 Control Panel设置决定，⽽不是由传递到date 参数的格式决定。事例：DateAdd("d",10,"2000-6-18")结果是： 2000-06-28DateAdd("m",-1,"2000-6-18")结果是： 2000-05-18
6、DateDiff 函数返回 Variant (Long) 的值，表⽰两个指定⽇期间的时间间隔数⽬。语法 DateDiff(interval, date1, date2[, firstdayofweek[, firstweekofyear]])DateDiff 函数语法中有下列命名参数：部分 描述interval 必要。字符串表达式，表⽰⽤来计算
date1 和 date2 的时间差的时间间隔Date1□date2 必要；Variant (Date)。计算中要⽤到的两个⽇期。Firstdayofweek 可选。指定⼀个星期的第⼀天的常数。如果未予指定，则以星期⽇为第⼀天。firstweekofyear 可选。指定⼀年的第⼀周的常数。如果未予指定，则以包含 1 ⽉ 1 ⽇的星期为第⼀周。interval 参数的设定值同DateAdd函数，请参考上⾯的例⼦。例：DateDiff("d",#2004-01-06#,#2004-01-07#) 1
7、DatePart 函数返回⼀个包含已知⽇期的指定时间部分的 Variant (Integer)。语法 DatePart(interval, date[,firstdayofweek[, firstweekofyear]])DatePart 函数语法中有下列命名参数：部分 描述interval 必要。字符串表达式，是要返回的时间间隔。date 必要。要计算的 Variant (Date) 值。Firstdayofweek 可选。指定⼀个星期的第⼀天的常数。如果未予指定，则以星期⽇为第⼀天。firstweekofyear 可选。指定⼀年第⼀周的常数。如果未予指定，则以包含 1 ⽉ 1 ⽇的星期为第⼀周。设置interval 参数的设定值同DateAdd()DatePart 函数⽰例本⽰例先取得⼀个⽇期，然后使⽤ DatePart 函数显⽰该⽇期是发⽣在该年的哪⼀季。Dim TheDate As Date ' 声明变量。Dim MsgT
12、Time 函数返回⼀个指明当前系统时间的 Variant (Date)。语法Time⽰例使⽤ Time 函数返回系统当前的时间。Dim MyTimeMyTime = Time ' 返回系统当前的时间说明为了设置系统时间，请使⽤ Time 语句。设置系统时间。语法Time = time必要的time 参数，可以是任何能够表⽰时刻的数值表达式、字符串表达式或它们的组合。说明如果 time 是⼀字符串，则 Time 会试着根据系统指定的时间，利⽤时间分隔符将其转换成⼀个时间。如果⽆法转换成⼀个有效的时间，则会导致错误发⽣。
13、FormatDateTime函数描述返回⼀个⽇期或时间格式的表达式。语法FormatDateTime(Date[,NamedFormat])FormatDateTime函数语法有如下⼏部分：部分 描述Date 必需的。要被格式化的⽇期表达式NamedFormat可选的。数字值，表⽰⽇期/时间所使⽤的格式。如果忽略该值，则使⽤vbGeneralDate。设置值NamedFormat参数的设置值如下：常数 值 描述vbGeneralDate
0 显⽰⽇期和/或时间。如果有⽇期部分，则⽤短⽇期格式显⽰。如果有时间部分，则⽤长时间格式显⽰。如果都有，两部分都显⽰。VbLongDate 1 ⽤计算机区域设置值中指定的长⽇期格式显⽰⽇期。VbShortDate 2 ⽤计算机区域设置值中指定的短⽇期格式显⽰⽇期。
18、⽤户⾃定义⽇期/时间格式 (Format 函数)下⾯标识⼀些可⽤来创建⽤户⾃定义⽇期/时间格式的字符：字符 说明(:) 时间分隔符。在⼀些区域，可能⽤其他符号来当时间分隔符。格式化时间值时，时间分隔符可以分隔时、分、秒。时间分隔符的真正字符在格式输出时取决于系统的设置。(/) ⽇期分隔符。在⼀些区域，可能⽤其他符号来当⽇期分隔符。格式化⽇期数值时，⽇期分隔符可以分隔年、⽉、⽇。⽇期分隔符的真正字符在格式输出时取决于系统设置。c 以 ddddd 来显⽰⽇期并且以 ttttt 来显⽰时间。如果想显⽰的数值⽆⼩数部分，则只显⽰⽇期部分，如果想显⽰的数值⽆整数部分，则只显⽰时间部分。d 以没有前导零的数字来显⽰⽇ (1–31)。dd 以有前导零的数字来显⽰⽇ (01–31)。ddd 以简写来表⽰⽇ (Sun–Sat)dddd 以全称来表⽰⽇ (Sunday–Saturday)ddddd 以完整⽇期表⽰法显⽰(包括年、⽉、⽇)，⽇期的显⽰要依系统的短⽇期格式设置⽽定。dddddd 以完整⽇期表⽰法显⽰⽇期系列数(包括年、⽉、⽇)，⽇期的显⽰要依系统识别的长⽇期格式⽽定。缺省的长⽇期格式为 mmmmdd, yyyy。aaaa 与dddd ⼀样，它只是该字符串的本地化版本。w 将⼀周中的⽇期以数值表⽰(1 表星期⽇~ 7表星期六)。ww 将⼀年中的星期以数值表⽰ (1–54)。m 以没有前导零的数字来显⽰⽉ (1–12)。如果 m 是直接跟在 h 或 hh 之后，那么显⽰的将是分⽽不是⽉。mm 以有前导零的数字来显
⽰⽉ (01 – 12)。如果m是直接跟在h或hh之后，那么显⽰的将是分⽽不是⽉。mmm 以简写来表⽰⽉ (Jan–Dec)。mmmm 以全称来表⽰⽉ (January–December)。oooo 与mmmm⼀样，它只是该字符串的本地化版本。q 将⼀年
如何将⽂本型：2003.08.04 转换为⽇期型：2003-08-04cdate(replace("2003.08.04",".","-"))显⽰当前⽇期在该年中所处的星期号
=Format(Now(), "ww")ww 为 1 到 53。显⽰⽇期字段值的四位年份值。=DatePart("yyyy", [订购⽇期])显⽰⽇期字段值前 10 天的⽇期值。=DateAdd("y", -10, [应付⽇期])显⽰⽇期字段值前⼀个⽉的⽇期值。=DateAdd("m",-1,Date())显⽰⽇期1和⽇期2之间相差的天数。=DateDiff("d", [订购⽇期], [发货⽇期])从今天算起到三个⽉后的⽇期之间的记录。Betweeb date() and adddate(3,date())根据出⽣⽇期计算年龄(周岁)=IIf(Month(Date())-Month([出⽣年⽉⽇])>-1,Year(Date())-Year([出⽣年⽉⽇]),Year(Date())-Year([出⽣年⽉⽇])-1)
⽇期函数⽰例当天⽇期：=Date()当⽇：=Day(date)当⽉：=Month(date())当年：=Year(date())当季：=DatePart("q",Date())
算出每个⽉的天数⼀法：Dim a, b, ca = Year(Now())b = Month(Now())c = Format((a & "/" & b + 1 & "/1"), ">#") -
Format((a & "/" & b & "/1"), ">#")⼆法：DateDiff("d", Format(Date, "yyyy-mm-01"), Format(DateAdd("m", -1, Date), "yyyy-mm-01"))DateDiff可以算出两个⽇期之间相差⼏天！三法：Day(DateAdd("d", -1, Format(Date, "yyyy-mm-01")))day函数可以知道某个⽇期是这个⽉的第⼏天，我们把这个⽉的最后⼀天拿出来DAY⼀下！应该还有更好的⽅法！⽐如说可以定义⼀个数组，把每个⽉的⽇⼦放进去，或者说写⼀个函数算每⼀个⽉的天数只要考虑⼀下闺年的问题就可以了！如何得到某年每个⽉的第⼀天是星期⼏Private Sub Command1_Click()Dim i As Integer, A As Integer, B As Integer, C As StringA = InputBox("请输⼊年份", "某年每个⽉的第⼀天是星期⼏")Form1.ClsFor i = 1 To 12C = A & "-" & i & "-1"B = Weekday(C)Select Case BCase vbSundayPrint A & "年" & i & "⽉1⽇是 星期⽇"Case vbMondayPrint A & "年" & i & "⽉1⽇是 星期⼀"Case vbTuesdayPrint A & "年" & i & "⽉1⽇是 星期⼆"Case vbWednesdayPrint A &adatediff是字符型函数
本⽂转⾃互联⽹，编辑⾼⼀鹏&惠星星@⼀鹏空间
版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。
Access时间日期比较查询的方法总结
« 上一篇
发表评论