ข้ามไปที่เนื้อหาหลัก
การสนับสนุน
ลงชื่อเข้าใช้

ฟังก์ชัน DatePart

ส่งกลับ ตัวแปร (จำนวนเต็ม) ที่มีส่วนที่ระบุของวันที่ระบุ

คำเตือน    มีปัญหากับการใช้ฟังก์ชันนี้ วันจันทร์สุดท้ายในปีปฏิทินบางปีสามารถถูกส่งกลับเป็นสัปดาห์ที่ 53 เมื่อควรจะเป็นสัปดาห์ที่ 1 For more information and a workaround, see Format or DatePart functions can return wrong week number for last Monday in Year.

ไวยากรณ์

DatePart ( ช่วง, วันที่ [, วันแรกของสัปดาห์] [, สัปดาห์แรกของปี] )

ไวยากรณ์ ของฟังก์ชัน DatePart มีอาร์กิวเมนต์ดังนี้

อาร์กิวเมนต์

คำอธิบาย

ช่วงเวลา

จำเป็น นิพจน์สตริงที่เป็นช่วงเวลาที่คุณต้องการส่งกลับ

date

จำเป็น ตัวแปร(วันที่ ) ค่าที่คุณต้องการประเมิน

วันแรกของสัปดาห์

ไม่จำเป็น ค่า ค่าคงที่ ที่ระบุวันแรกของสัปดาห์ ถ้าไม่ได้ระบุ จะถือว่าเป็นวันอาทิตย์

สัปดาห์แรกของปี

ไม่จำเป็น ค่าคงที่ที่ระบุสัปดาห์แรกของปี ถ้าไม่ได้ระบุ สัปดาห์แรกจะถือว่าเป็นสัปดาห์ที่มีวันที่ 1 มกราคม

การตั้งค่า

อาร์กิวเมนต์ Interval มีการตั้งค่าเหล่านี้:

การตั้งค่า

คำอธิบาย

yyyy

ปี

q

ไตรมาส

m

เดือน

y

วันของปี

d

วัน

w

วันทำงาน

ww

สัปดาห์

h

ชั่วโมง

n

นาที

s

วินาที

อาร์กิวเมนต์ วันแรกของสัปดาห์ มีการตั้งค่าเหล่านี้:

ค่าคงที่

ค่า

คำอธิบาย

vbUseSystem

0

ใช้การตั้งค่า NLS API

vbSunday

1

วันอาทิตย์ (ค่าเริ่มต้น)

vbMonday

2

วันจันทร์

vbTuesday

3

วันอังคาร

vbWednesday

4

วันพุธ

vbThursday

5

วันพฤหัสบดี

vbFriday

6

วันศุกร์

vbSaturday

7

วันเสาร์

อาร์กิวเมนต์ สัปดาห์แรกของปีมี การตั้งค่าเหล่านี้:

ค่าคงที่

ค่า

คำอธิบาย

vbUseSystem

0

ใช้การตั้งค่า NLS API

vbFirstJan1

1

เริ่มต้นด้วยสัปดาห์ที่มีวันที่ 1 มกราคม (ค่าเริ่มต้น)

vbFirstFourDays

2

เริ่มต้นด้วยสัปดาห์แรกที่มีอย่างน้อยสี่วันในปีใหม่

vbFirstFullWeek

3

เริ่มต้นด้วยสัปดาห์แรกของปี

ข้อสังเกต

คุณสามารถใช้ฟังก์ชัน DatePart เพื่อประเมินวันที่และส่งกลับช่วงของเวลาที่ระบุ ตัวอย่างเช่น คุณอาจใช้ DatePart เพื่อคํานวณวันในสัปดาห์หรือชั่วโมงปัจจุบัน

อาร์กิวเมนต์ วันแรกของสัปดาห์จะ ส่งผลต่อการคํานวณที่ใช้สัญลักษณ์ช่วงเวลา "w" และ "ww"

ถ้า dateสัญพจน์วันที่ ปีที่ระบุจะกลายเป็นส่วนถาวรของวันที่นั้น อย่างไรก็ตามถ้าวันที่อยู่ในเครื่องหมายอัญประกาศคู่ (" ") และคุณได้ละเว้นปี ปีปัจจุบันจะถูกแทรกลงในโค้ดของคุณทุกครั้งที่มีการประเมินนิพจน์วันที่ ซึ่งช่วยให้สามารถเขียนรหัสที่สามารถใช้ในปีที่แตกต่างกันได้

หมายเหตุ: For date,if the Calendar property setting is Gregorian, the supplied date must be Gregorian. ถ้าปฏิทินคือฮิจเราเราย์ วันที่ที่ระบุต้องเป็น ฮิจเราเราย์

ส่วนที่ส่งกลับวันที่อยู่ในหน่วยช่วงเวลาของปฏิทินภาษาอาหรับปัจจุบัน ตัวอย่างเช่น ถ้าปฏิทินปัจจุบันฮิจเราราและส่วนที่ส่งกลับคือปี ค่าปีคือปีฮิจเราเราย์

ตัวอย่างคิวรี

นิพจน์

ผลลัพธ์

SELECT DatePart("yyyy",[DateofSale]) AS NewDate FROM ProductSales;

ส่งกลับ 'ปี' ของค่าวันที่ของเขตข้อมูล "DateofSale"

SELECT DatePart("q",[DateofSale]) AS NewDate FROM ProductSales;

ส่งกลับ 'ไตรมาส' (ตามปีปฏิทิน) ของค่าวันที่ของเขตข้อมูล "DateofSale"

SELECT DatePart("y",[DateofSale]) AS NewDate FROM ProductSales;

ส่งกลับ 'วันของปี' (1 ถึง 365) ของค่าวันที่ของเขตข้อมูล "DateofSale"

SELECT DatePart("d",[DateofSale]) AS NewDate FROM ProductSales;

ส่งกลับ 'วัน' ของค่าวันที่ของเขตข้อมูล "DateofSale"

SELECT DatePart("w",[DateofSale]) AS NewDate FROM ProductSales;

ส่งกลับ 'วันธรรมดา' (ตั้งแต่ 1 ถึง 7 ที่ 1 หมายถึงวันอาทิตย์) ของค่าวันที่ของเขตข้อมูล "DateofSale"

SELECT DatePart("ww",[DateofSale]) AS NewDate FROM ProductSales;

ส่งกลับ 'จํานวนสัปดาห์' (ตั้งแต่ 1 ถึง 52) ของค่าวันที่ของเขตข้อมูล "DateofSale"

SELECT DatePart("h",[DateTime]) AS NewDate FROM ProductSales;

ส่งกลับ 'ชั่วโมง' ของค่าวันที่ของเขตข้อมูล "DateTime"

SELECT DatePart("n",[DateTime]) AS NewDate FROM ProductSales;

ส่งกลับ 'นาที' ของค่าวันที่ของเขตข้อมูล "DateTime"

SELECT DatePart("s",[DateTime]) AS NewDate FROM ProductSales;

ส่งกลับ 'seconds' ของค่าวันที่ของเขตข้อมูล "DateTime"

ตัวอย่าง VBA

หมายเหตุ: ตัวอย่างที่ตามมาจะสาธิตการใช้ฟังก์ชันนี้ในโมดูล Visual Basic for Applications (VBA) For more information about working with VBA, select Developer Reference in the drop-down list next to Search and enter one or more terms in the search box.

ตัวอย่างนี้จะใช้วันที่ และ ใช้ฟังก์ชัน DatePart จะแสดงไตรมาสของปีที่เกิดขึ้น

Dim TheDate As Date    ' Declare variables.
Dim Msg
TheDate = InputBox("Enter a date:")
Msg = "Quarter: " & DatePart("q", TheDate)
MsgBox Msg

ดูเพิ่มเติม

การเลือกฟังก์ชันวันที่ที่ถูกต้อง

ต้องการความช่วยเหลือเพิ่มเติมหรือไม่

ขยายทักษะ Office ของคุณ
สำรวจการฝึกอบรม
รับฟีเจอร์ใหม่ก่อนใคร
เข้าร่วม Office Insider

ข้อมูลนี้เป็นประโยชน์หรือไม่

ขอบคุณสำหรับคำติชมของคุณ!

ขอขอบคุณสำหรับคำติชมของคุณ! เราคิดว่าอาจเป็นประโยชน์ที่จะให้คุณได้ติดต่อกับหนึ่งในตัวแทนฝ่ายสนับสนุน Office ของเรา

×