Access日期与时间函数汇总
Access日期与时间函数汇总,需要的朋友可以参考一下
今天在开发系统的时候,需要实现这样一个功能
根据选中的日期,查询相关的内容,但不是按照整个日期去过滤,而是根据,年,月,日拆分的形式去过滤,比如2013年的,2月份的
在sqlserver中,我们可以可以直接根据datePart去完成即可
select * from pays where 1=1 and datepart(year, pdate)=2013 and datepart(month, pdate)=2 and datepart(day, pdate)=26 order by pdate
但是在access中却通不过,因为方法有些不一样,需要这样写
select * from pays where 1=1 and datepart("yyyy", pdate)=2013 and datepart("m", pdate)=2 and datepart('d', pdate)=21 order by pdate
关于sqlserver的函数在前面说到了,现在把access的日期函数总结一下
如何将文本型:2003.08.04 转换为日期型:2003-08-04
cdate(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)
自定义日期/时间格式 (Format 函数)
(:) 时间分隔符。在一些区域,可能用其他符号来当时间分隔符。格式化时间值时,时间分隔符可以分隔时、分、秒。时间分隔符的真正字符在格式输出时取决于系统的设置。
(/) 日期分隔符。在一些区域,可能用其他符号来当日期分隔符。格式化日期数值时,日期分隔符可以分隔年、月、日。日期分隔符的真正字符在格式输出时取决于系统设置。
C 以 ddddd 来显示日期并且以 ttttt 来显示时间。如果想显示的数值无小数部分,则只显示日期部分,如果想显示的数值无整数部分,则只显示时间部分。
D
以没有前导零的数字来显示日 (1 – 31)。
Dd
以有前导零的数字来显示日 (01 – 31)。
ddd
以简写来表示日 (Sun –Sat)。
dddd
以全称来表示日 (Sunday –Saturday)。
ddddd
以完整日期表示法显示(包括年、月、日),日期的显示要依系统的短日期格式设置而定。缺省的短日期格式为 m/d/yy。
dddddd
以完整日期表示法显示日期系列数(包括年、月、日),日期的显示要依系统识别的长日期格式而定。缺省的长日期格式为 mmmm dd, 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
将一年中的季以数值表示 (1 – 4)。
Y
将一年中的日以数值表示 (1 – 366)。
Yy
以两位数来表示年 (00 – 99)。
yyyy
以四位数来表示年 (00 – 99)。
H
以没有前导零的数字来显示小时 (0 – 23)。
Hh
以有前导零的数字来显示小时 (00– 23)。
N
以没有前导零的数字来显示分 (0 – 59)。
Nn
以有前导零的数字来显示分 (00 – 59)。
S
以没有前导零的数字来显示秒 (0 – 59)。
Ss
以有前导零的数字来显示秒 (00 – 59)。
t t t t t
以完整时间表示法显示(包括时、分、秒),用系统识别的时间格式定义的时间分隔符进行格式化。如果选择有前导零并且时间是在 10:00 A.M. 或 P.M.之前,那么将显示有前导零的时间。缺省的时间格式为 h:mm:ss。
AM/PM
在中午前以 12 小时配合大写 AM 符号来使用;在中午和 11:59 P.M.间以 12 小时配合大写 PM 来使用。
Am/pm
在中午前以 12 小时配合小写 am 符号来使用;在中午和 11:59 P.M.间以 12 小时配合小写 pm 来使用。
A/P
在中午前以 12 小时配合大写A符号来使用;在中午和 11:59 P.M.间以12 小时配合大写P来使用。
a/p
在中午前以 12 小时配合小写a符号来使用;在中午和 11:59 P.M.间以 12 小时配合小写p来使用。
AMPM
在中午前以 12 小时配合系统设置的 AM字符串文字来使用;在中午和 11:59 P.M. 间以 12 小时配合系统设置的 PM 字符串文字来使用。AMPM 可以是大写或小写,但必须和您的系统设置相配。其缺省格式为 AM/PM。
日期函数示例
当天日期:=Date()
当日:=Day(date)
当月:=Month(date())
当年:=Year(date())
当季:=DatePart("q",Date())
把日期大写
Function Date2Chinese(iDate)
Dim num(10)
Dim iYear
Dim iMonth
Dim iDay
num(0) = "〇"
num(1) = "一"
num(2) = "二"
num(3) = "三"
num(4) = "四"
num(5) = "五"
num(6) = "六"
num(7) = "七"
num(8) = "八"
num(9) = "九"
iYear = Year(iDate)
iMonth = Month(iDate)
iDay = Day(iDate)
Date2Chinese = num(iYear \ 1000) + _
num((iYear \ 100) Mod 10) + num((iYear \ 10) Mod 10) + num(iYear Mod 10) + "年"
If iMonth >= 10 Then
If iMonth = 10 Then
Date2Chinese = Date2Chinese +"十" + "月"
Else
Date2Chinese = Date2Chinese +"十" + num(iMonth Mod 10) + "月"
End If
Else
Date2Chinese = Date2Chinese +num(iMonth Mod 10) + "月"
End If
If iDay >= 10 Then
If iDay = 10 Then
Date2Chinese = Date2Chinese +"十" + "日"
ElseIf iDay = 20 Or iDay = 30 Then
Date2Chinese = Date2Chinese + num(iDay \ 10) + "十" + "日"
ElseIf iDay > 20 Then
Date2Chinese = Date2Chinese + num(iDay \ 10) + "十" + num(iDay Mod 10) + "日"
Else
Date2Chinese = Date2Chinese + "十" + num(iDay Mod 10) + "日"
End If
Else
Date2Chinese = Date2Chinese + num(iDay Mod 10) + "日"
End If
End Function
算出每个月的天数
一法:
Dim a, b, c
a = 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 String
A = InputBox("请输入年份", "某年每个月的第一天是星期几")
Form1.Cls
For i = 1 To 12
C = A & "-" & i & "-1"
B = Weekday(C)
Select Case B
Case vbSunday
Print A & "年" & i & "月1日是 星期日"
Case vbMonday
Print A & "年" & i & "月1日是 星期一"
Case vbTuesday
Print A & "年" & i & "月1日是 星期二"
Case vbWednesday
Print A & "年" & i & "月1日是 星期三"
Case vbThursday
Print A & "年" & i & "月1日是 星期四"
Case vbFriday
Print A & "年" & i & "月1日是 星期五"
Case vbSaturday
Print A & "年" & i & "月1日是 星期六"
End Select
Next i
End Sub
计算天数及月初月末日期
Function 本月天数(日期 As Date) As Byte
本月天数 = DateSerial(Year(日期), Month(日期) + 1, Day(日期)) - 日期
End Function
Function 月末(日期 As Date) As Date
月末 = DateSerial(Year(日期), Month(日期) + 1, 1) - 1
End Function
Function 月初(日期 As Date) As Date
月初 = 日期 - Day(日期) + 1
End Function
本月最后一日是周几
SELECT
Weekday(DateAdd("m",1,DateSerial(Year(Date()),Month(Date()),1)-1)) AS 本月最后一日是周几,
下月最后一日是周几
SELECT
Weekday(DateAdd("m",2,DateSerial(Year(Date()),Month(Date()),1)-1)) AS 下月最后一日是周几,
本月最后一个周5到月底的天数
SELECT
(Weekday(DateAdd("m",1,DateSerial(Year(Date()),Month(Date()),1)-1))+1) Mod 7 AS 本月最后一个周5到月底的天数;
下月最后一个周5到月底的天数
SELECT
(Weekday(DateAdd("m",2,DateSerial(Year(Date()),Month(Date()),1)-1))+1) Mod 7 AS 下月最后一个周5到月底的天数;
本月最后一个周5的日期
SELECT
DateAdd("m",1,DateSerial(Year(Date()),Month(Date()),1))-1-(Weekday(DateAdd("m",1,DateSerial(Year(Date()),Month(Date()),1)-1))+1) Mod 7 AS 本月最后一个周5的日期;
下月最后一个周5的日期
SELECT
DateAdd("m",2,DateSerial(Year(Date()),Month(Date()),1))-1-(Weekday(DateAdd("m",2,DateSerial(Year(Date()),Month(Date()),1)-1))+1) Mod 7 AS 下月最后一个周5的日期;
多思考,多创新,才是正道!

熱AI工具

Undresser.AI Undress
人工智慧驅動的應用程序,用於創建逼真的裸體照片

AI Clothes Remover
用於從照片中去除衣服的線上人工智慧工具。

Undress AI Tool
免費脫衣圖片

Clothoff.io
AI脫衣器

Video Face Swap
使用我們完全免費的人工智慧換臉工具,輕鬆在任何影片中換臉!

熱門文章

熱工具

記事本++7.3.1
好用且免費的程式碼編輯器

SublimeText3漢化版
中文版,非常好用

禪工作室 13.0.1
強大的PHP整合開發環境

Dreamweaver CS6
視覺化網頁開發工具

SublimeText3 Mac版
神級程式碼編輯軟體(SublimeText3)

如何使用Go語言中的時間函數產生日程日曆並產生簡訊提醒?在當今快節奏的生活中,人們經常需要一個有效的方式來管理和提醒自己的日程安排。使用Go語言中的時間函數可以很方便地產生日程日曆,並利用簡訊提醒功能及時提醒使用者。本文將介紹如何使用Go語言中的時間函數產生行程日曆,並結合程式碼範例來講解如何產生簡訊提醒。首先,我們需要導入time包,該包提供了與時間相關的函數和

如何使用Go語言中的時間函數產生日程日曆並產生微信和郵件提醒?在現代社會中,時間管理變得越來越重要。為了有效率地處理我們的日程安排,使用日程日曆工具是必不可少的。而在這個資訊時代,微信和郵件成為人們最常用的溝通方式。因此,能夠自動將日程提醒發送到微信和郵件中,將會在一定程度上提升我們的生活效率。 Go語言作為一種強大的後端開發語言,提供了許多處理時間和日期的函數

在Web開發中,處理時間是非常常見的任務。 PHP提供了許多內建函數來處理時間和日期,這些函數使得在PHP中處理時間和日期變得更加輕鬆和有效率。在本篇文章中,我們將探討PHP時間函數的一個實例,也就是如何比較兩個時間。 PHP比較時間的方法PHP提供了幾個函數可以用來比較兩個時間。以下是這些函數的簡單介紹:strtotime()strtotime()函數

如何使用Go語言中的時間函數產生日曆並輸出到HTML檔案?隨著網路的發展,許多傳統工具和應用也逐漸遷移到了電子設備上。日曆作為重要的時間管理工具,也不例外。利用Go語言中的時間函數,我們可以輕鬆地產生一個日曆,並將其輸出為HTML文件,方便我們在電腦或手機上查看和使用。要完成這個任務,我們首先需要了解Go語言的時間函數,它可以幫助我們處理日期和時間相關

如何使用Go語言中的時間函數取得當前時間並格式化輸出? Go語言提供了豐富的時間函數,可以輕鬆取得當前時間並進行格式化輸出。下面我們將介紹如何使用Go語言中的時間函數來實現這項功能。首先,我們需要導入time套件:import"time"取得目前時間的方法是呼叫time.Now()函數,該函數傳回一個Time型別的結構體,表示目前的時間點

如何使用Go語言中的時間函數產生日程日曆並產生郵件提醒?引言:在日常生活和工作中,我們經常會有各種各樣的日程安排和事務提醒,例如重要會議、生日禮物購買、旅行安排等等。為了更好地管理和追蹤這些日程,我們可以使用Go語言中的時間函數來產生日程日曆,並透過郵件進行提醒。本文將介紹如何使用Go語言編寫程式碼來實現這項功能。一、生成行程日曆在Go語言中,可以使用time

如何使用MySQL中的TIME函數取得當前時間在開發應用程式時,經常需要取得當前時間或僅只關心時間部分。 MySQL中的TIME函數可以幫助我們輕鬆取得當前時間,它可以傳回一個表示當前時間的值。本文將介紹如何使用MySQL中的TIME函數以及一些常見的用法。首先,讓我們來了解一下TIME函數的語法:TIME()TIME函數不需要任何參數,直接使用即可。它將

如何使用Go語言中的時間函數產生日程日曆並匯出到PDF檔案?在日常生活和工作中,我們經常需要安排和管理日程,其中的重要任務是產生日程日曆。 Go語言作為一種簡潔且有效率的程式語言,提供了豐富的時間函數,可以方便地操作日期和時間。本文將介紹如何使用Go語言中的時間函數產生日程日曆,並將其匯出到PDF檔案。首先,我們需要建立一個日程日曆的資料結構。假設我們的日程日曆包
