ในภาษา
OpenOffice
/ LibreOffice Basic ข้อมูลที่เกี่ยวกับวันเวลา
จะมีข้อมูลรูปแบบเฉพาะเรียกว่าข้อมูลแบบ
Date
ซึ่งจะถูกเก็บอยู่ในรูปของ
Binary
ในแง่ของการใช้งาน
นักพัฒนาโปรแกรมไม่จำเป็นต้องรู้จักรูปแบบข้อมูลที่จัดเก็บโดยละเอียด
เนื่องจากสามารถจัดการได้โดยการใช้ข้อความ
ที่ถูกจัดให้อยู่ในรูปของวันและเวลาแทน
8.1
การกำหนดค่าให้ตัวแปรแบบ
Date
ในการกำหนดค่าให้กับตัวแปรสำหรับเก็บข้อมูลแบบ
Date
สามารถเลือกดำเนินการเลือกดำเนินการได้ใน
2
ลักษณะคือ
กำหนดค่าโดยใช้ข้อความที่จัดอยู่ในรูปมาตรฐานของวันและเวลา
หรือใช้ชุดคำสั่งในการกำหนดค่า
8.1.1
การกำหนดค่าโดยจัดในรูปข้อความ
ในตัวอย่างที่
8-01
เป็นตัวอย่างกำหนดค่าให้กับตัวแปรที่ใช้เก็บข้อมูลแบบ
Date
ที่อยู่ในรูปของข้อความ
ซึ่งจัดอยู่ในรูป “DD.MM.YYYY”
ตัวอย่างที่
8-01
: การกำหนดค่าให้กับตัวแปรแบบ
Date
ในรูปข้อความ
SUB
subExample08_01
Dim
dTestDateVar As Date
dTestDateVar
= "31.8.2007"
MsgBox
"กำหนด
dTestDateVar
= ""31.8.2007""" + Chr(13) + _
"ค่าที่เก็บในตัวแปร
dTestDateVar
คือ
"
+ dTestDateVar
END
SUB
|
รูปที่ 8-1 ผลการทำงานของ subExample08_01
โดยปรกติในภาษา
OpenOffice
/ LibreOffice Basic จะใช้เครื่องหมาย
/
หรือเครื่องหมาย
.
(จุด)
ในการแยกชุดข้อมูลวันเวลาที่จัดอยู่ในรูปข้อความดังในตัวอย่างข้างต้น
ในการทำงาน
ตัวแปรภาษาของภาษา OpenOffice
/ LibreOffice Basic จะทำการแปลงข้อมูลที่เป็นข้อความให้เป็นข้อมูลแบบ
Date
โดยอัตโนมัติ
ก่อนที่จะนำค่าไปเก็บไว้ในตัวแปร
8.1.2
การกำหนดค่าโดยการใช้ชุดคำสั่ง
นอกจากเราจะสามารถกำหนดค่าให้กับตัวแปรแบบ
Date
ด้วยข้อมูลวันเวลาที่อยู่ในรูปข้อความแล้ว
เรายังสามารถใช้คำสั่งช่วยในการกำหนดค่าให้ตัวแปรแบบ
Date
ได้ด้วย
ซึ่งชุดคำสั่งที่ใช้ได้แก่
คำสั่ง DateSerial()
สำหรับกรณีข้อมูลที่เป็นวันเดือนปีและ
TimeSerial()
สำหรับข้อมูลเกี่ยวกับเวลา
8.1.2.1
การใช้คำสั่ง
DateSerial()
คำสั่ง
DateSerial()
เป็นคำสั่งที่ทำหน้าที่แปลงชุดข้อมูลปี
เดือน และวันที่ให้อยู่ในรูปข้อมูลแบบ
Date
ซึ่งมีรูปแบบชุดคำสั่งดังนี้
รูปแบบชุดคำสั่ง
:
DateSerial
(year, month, day) As Date
|
โดยที่
year
หมายถึง
เลขปี ค.ศ.
4 หลัก
month หมายถึง
เลขเดือน ซึ่งเป็นค่าตัวเลขในช่วง
1
ถึง
12
day
หมายถึง
เลขวันที่ ซึ่งเป็นค่าตัวเลขในช่วง
1
ถึง
31
8.1.2.2
การใช้คำสั่ง
TimeSerial()
คำสั่ง
TimeSerial()
เป็นชุดคำสั่งที่ทำหน้าที่แปลงชุดข้อมูลเวลา
ซึ่งประกอบด้วยชั่วโมง,
นาที
และวินาที โดยมีรูปแบบชุดคำสั่งดั่งนี้
รูปแบบชุดคำสั่ง
:
TimeSerial
(hour, minute, second) As Date
|
โดยที่
hour หมายถึง
เลขชั่วโมง (0
ถึง
23)
minute หมายถึง
เลขนาที (0
ถึง
59)
second หมายถึง
เลขวินาที (0
ถึง
59)
คำสั่ง
Now
ของภาษา
OpenOffice
/ LibreOffice Basic
เป็นชุดคำสั่งที่ทำหน้าที่หาค่าวันเวลาในขณะปัจจุบัน
|
ตัวอย่างที่
8-02
: การกำหนดค่าให้กับตัวแปรแบบ
Date
ด้วยชุดคำสั่ง
SUB
subExample08_02
Dim
dTestDateVar As Date
Dim
sDisplayStr AS String
dTestDateVar
= Now
sDisplayStr
= "กำหนด
dTestDateVar
= Now" + Chr(13) + _
"ค่าที่เก็บในตัวแปร
dTestDateVar
คือ
"
+ dTestDateVar
dTestDateVar
= DateSerial(2007, 10, 17)
sDisplayStr
= sDisplayStr + Chr(13) + Chr(13) + _
"คำสั่ง
dTestDateVar
= DateSerial(2007, 10, 15)" + Chr(13) + _
"ค่าที่เก็บในตัวแปร
dTestDateVar
คือ
"
+ dTestDateVar
dTestDateVar
= TimeSerial(09, 09, 05)
sDisplayStr
= sDisplayStr + Chr(13) + Chr(13) + _
"คำสั่ง
dTestDateVar
= TimeSerial(09, 09, 05)" + Chr(13) + _
"ค่าที่เก็บในตัวแปร
dTestDateVar
คือ
"
+ dTestDateVar
MsgBox
sDisplayStr
END
SUB
|
รูปที่
8-2
ผลการทำงานของ
subExample08_02
เวลา
|
เหตุการณ์
|
|||
06:00 น. | ตื่นนอน อ่านวารสารไมโครคอมพิวเตอร์ | |||
07:00 น. | ซ่อมหลังค่าซุ้มน้ำหมักชีวภาพ | |||
08:45 น. |
|
|||
09:15 น. | ตรวจสอบบล็อกเกอร์ที่ถูกลบ | |||
10:15 น. | ไปพิมพ์เอกสารที่วัด ปรากฏว่าไฟฟ้าดับ | |||
11:15 น. | คืนค่าบล็อกเกอร์ที่ถูกลบ | |||
11:45 น. | Note:จ่าเนียนแวะมาที่บ้าน | |||
12:30 น. |
|
|||
13:15 น. | สูบน้ำใช้ด้วยปั้มชักพลังงานโซลาร์เซลล์ | |||
14:00 น. |
0.งานของกิจกรรมอาชีพ
กสิกรรมธรรมชาติ บ้านแม่ทำ
สีทา (3/2557)
: สูบน้ำรดต้นไม้ด้วยปั้มชักพลังงานโซลาร์เซลล์
|
1.ทำบันทึกประจำวันของวันก่อน,
ทำบัญชีครัวเรือน
|
||
14:30 น. |
1.งานของกิจกรรมอาชีพ
งานอินเตอร์เน็ต
(18/2557):ทำต้นฉบับบทความเรื่องใหม่
|
|||
15:00 น. | ลองเชื่อมต่ออินเตอร์เน็ตเนื่องจาก AIS ตั้งเสาสัญญาณใหม่ที่หน้า ร.ร. นิคมฯ2 | |||
16:30 น. | ไปพิมพ์เอกสารที่วัดเขาแก้ว | |||
18:00 น. | เชื่อมต่ออินเตอร์เน็ต ค้นข้อมูลเกี่ยวกับเว็บโฮสติ้ง | |||
19:30 น. |
|
|||
21:00 น. | เข้านอน |