ส่งกลับ ตัวแปร (วันที่) ที่มีเวลาสำหรับชั่วโมง นาที และวินาทีที่ระบุ
ไวยากรณ์
TimeSerial(hour, minute, second)
คําเตือน ตรวจสอบให้แน่ใจว่าอาร์กิวเมนต์อยู่ในช่วงของค่าที่ถูกต้อง อาร์กิวเมนต์ที่ไม่ถูกต้องอาจทําให้ได้ผลลัพธ์ที่ไม่ถูกต้อง
ไวยากรณ์ของฟังก์ชัน TimeSerial มีอาร์กิวเมนต์ดังต่อไปนี้
| อาร์กิวเมนต์ | คำอธิบาย |
|---|---|
| ชั่วโมง | จำเป็น ตัวแปร (จํานวนเต็ม) ตัวเลขระหว่าง 0 (12:00 A.M.) ถึง 23 (11:00 P.M.) ครอบคลุม หรือนิพจน์ตัวเลข |
| นาที | จำเป็น ตัวแปร (จํานวนเต็ม) นิพจน์ตัวเลขใดก็ได้ |
| วินาที | จำเป็น ตัวแปร (จํานวนเต็ม) นิพจน์ตัวเลขใดก็ได้ |
ข้อสังเกต
เมื่อต้องการระบุเวลา เช่น 11:59:59 ช่วงตัวเลขสําหรับแต่ละอาร์กิวเมนต์ TimeSerial ควรอยู่ในช่วงปกติสําหรับหน่วย นั่นคือ 0-23 หมายถึงชั่วโมง และ 0-59 สําหรับนาทีและวินาที อย่างไรก็ตาม คุณยังสามารถระบุเวลาสัมพัทธ์สําหรับแต่ละอาร์กิวเมนต์ได้โดยใช้นิพจน์ตัวเลขใดๆ ที่แสดงตัวเลขที่แสดงจํานวนชั่วโมง นาที หรือวินาทีก่อนหรือหลังเวลาที่กําหนด ตัวอย่างต่อไปนี้ใช้นิพจน์แทนตัวเลขเวลาสัมบูรณ์ ฟังก์ชัน TimeSerial ส่งกลับเวลา 15 นาทีก่อน (-15) หกชั่วโมงก่อนเที่ยง ()12 - 6 หรือ 5:45:00 น.
TimeSerial(12 - 6, -15, 0)
เมื่ออาร์กิวเมนต์ใดเกินช่วงปกติสําหรับอาร์กิวเมนต์นั้น อาร์กิวเมนต์จะเพิ่มขึ้นเป็นหน่วยถัดไปที่มีขนาดใหญ่ขึ้นตามความเหมาะสม ตัวอย่างเช่น ถ้าคุณระบุ 75 นาที ระบบจะประเมินเป็นหนึ่งชั่วโมง 15 นาที ถ้าอาร์กิวเมนต์เดี่ยวใดอยู่นอกช่วง -32,768 ถึง 32,767 จะเกิดข้อผิดพลาด ถ้าเวลาที่ระบุโดยอาร์กิวเมนต์ทั้งสามทําให้วันที่อยู่นอกช่วงของวันที่ที่ยอมรับได้ จะเกิดข้อผิดพลาดขึ้น
ตัวอย่างคิวรี
| นิพจน์ | ผลลัพธ์ |
|---|---|
| SELECT TimeSerial(18,12,10) AS NewTime FROM ProductSales GROUP BY TimeSerial(18,12,10); | ส่งกลับ "เวลา" ที่ประกอบด้วยชั่วโมง นาที และวินาทีที่ระบุซึ่งใส่ไว้ในอาร์กิวเมนต์ของฟังก์ชัน และแสดงในคอลัมน์ NewTime ผลลัพธ์: "6:12:10 PM" |
ตัวอย่าง VBA
หมายเหตุ
ตัวอย่างต่อไปนี้จะสาธิตการใช้ฟังก์ชันนี้ในโมดูล Visual Basic for Applications (VBA) สําหรับข้อมูลเพิ่มเติมเกี่ยวกับการทํางานกับ VBA ให้เลือก การอ้างอิงนักพัฒนาในรายการ ดรอปดาวน์ที่อยู่ถัดจาก ค้นหา แล้วใส่คําอย่างน้อยหนึ่งคําในกล่องค้นหา
ตัวอย่างนี้ใช้ฟังก์ชัน TimeSerial เพื่อส่งกลับเวลาสําหรับชั่วโมง นาที และวินาทีที่ระบุ
Dim MyTime
MyTime = TimeSerial(16, 35, 17)
' MyTime contains serial representation of 4:35:17 PM.