กลุ่มชุดคำสั่งในการแปลงค่าข้อมูล ชุด 2 ของภาษา OpenOffice/LibreOffice Basic

  

Advertise with Anonymous Ads

ชุดคำสั่ง : CLng

ประเภทชุดคำสั่ง : Function

      ทำหน้าที่แปลงค่าข้อมูลที่เป็นข้อความ หรือ ค่าตัวเลขให้เป็นค่าตัวเลขแบบ Long Integer โดยกรณีที่เป็นเลขทศนิยม ผลลัพธ์ที่ได้จะเป็นเลขจำนวนเต็มที่ใกล้เคียงกับค่าเดิมมากที่สุด (โดยการปัดค่าตัวเลข) และในกรณีที่เป็นค่าตัวเลขที่อยู่นอกช่วง -2,147,483,648 ถึง 2,147,483,647 OpenOffice.org Basic จะแสดงข้อผิดพลาดเป็น overflow error สำหรับกรณีที่เป็นข้อความจะต้องอยู่ในรูปข้อความตัวเลข เช่น “135.5” เป็นต้น

รูปแบบชุดคำสั่ง :

           CLng (Expression)

ค่าที่ส่งกลับ : Long

พารามิเตอร์ :

          Expression หมายถึง ค่าข้อมูลที่จะแปลงค่าเป็นตัวเลขแบบ Long Integer

รหัสข้อผิดพลาด :

          5 Invalid procedure call (ดูรายละเอียดเพิ่มเติมที่ชุดคำสั่ง Error)

ชุดคำสั่ง : CSng

ประเภทชุดคำสั่ง : Function

      ทำหน้าที่แปลงค่าข้อมูลที่เป็นข้อความ หรือ ค่าตัวเลขให้เป็นค่าตัวเลขแบบ Single โดยกรณีที่เป็นข้อความจะต้องอยู่ในรูปข้อความตัวเลข เช่น “135.5” เป็นต้น

รูปแบบชุดคำสั่ง :

          CSng (Expression)

ค่าที่ส่งกลับ : Single

พารามิเตอร์ :

           Expression หมายถึง ค่าข้อมูลที่จะแปลงค่าเป็นตัวเลขแบบ Single

รหัสข้อผิดพลาด :

           5 Invalid procedure call (ดูรายละเอียดเพิ่มเติมที่ชุดคำสั่ง Error)

ชุดคำสั่ง : CStr

ประเภทชุดคำสั่ง : Function

      ทำหน้าที่แปลงค่าข้อมูลแบบต่างๆ เป็นข้อความ กรณีเป็นเลขทศนิยม เลข 0 ที่อยู่หลังสุดของเลขทศนิยม จะถูกละทิ้ง

ตารางที่ 7 : การทำงานของคำสั่ง CStr กับข้อมูลชนิดต่างๆ

ชนิดข้อมูล	ผลการทำงานของ CStr
Boolean	ข้อความ True หรือ False
Date	ข้อความวันเวลา
Null	Run-time error.
Empty	ข้อความว่าง
Any	ข้อความที่ตรงค่าของข้อมูล

รูปแบบชุดคำสั่ง :

           CStr (Expression)

ค่าที่ส่งกลับ : String

พารามิเตอร์ :

           Expression หมายถึง ค่าข้อมูลที่จะแปลงเป็น String

รหัสข้อผิดพลาด :

          5 Invalid procedure call (ดูรายละเอียดเพิ่มเติมที่ชุดคำสั่ง Error)

ตัวอย่าง :

SUB subDataConvertFunction

       Dim sDisplay As String

       sDisplay = "CDbl(654321.12)= " + CDbl(654321.12) + Chr(13)

       sDisplay = sDisplay + "CSng(1234.5678)= " + CSng(1234.5678) + Chr(13)

       sDisplay = sDisplay + "CInt(1234.5678)= " + CInt(1234.5678) + Chr(13)

       sDisplay = sDisplay + "CLng(654321.12)= " + Clng(654321.12) + Chr(13)

       sDisplay = sDisplay + "Str(777777.770)= " + Str(777777.770)

       MsgBox sDisplay

END SUB

รูปที่ 12 ภาพตัวอย่างการทำงานของซับรูทีน subDataConvertFunction

ชุดคำสั่ง : CVar

ประเภทชุดคำสั่ง : Function

      ทำหน้าที่แปลงค่าข้อมูลที่เป็นข้อความ หรือตัวเลขเป็นค่าข้อมูลแบบ variant

รูปแบบชุดคำสั่ง :

           CVar(Expression)

ค่าที่ส่งกลับ : Variant

พารามิเตอร์ :

           Expression หมายถึง ค่าข้อมูลที่จะแปลงค่าเป็น variant expression

ชุดคำสั่ง : CVErr

ประเภทชุดคำสั่ง : Function

      ทำหน้าที่เปลี่ยนค่าข้อความหรือค่าตัวเลขเป็นโดยแสดงเป็นข้อความ “Error”

รูปแบบชุดคำสั่ง :

            CVErr(Expression)

ค่าที่ส่งกลับ : Variant.

พารามิเตอร์ :

           Expression หมายถึง ข้อมูลที่ต้องการแปลงค่า

บันทึกประจำวันที่ 19 พฤษภาคม พ.ศ. 2557 (2014)

เวลา	เหตุการณ์
06:00 น.	ตื่นนอน
05:15 น.	งานของกิจกรรมอาชีพ กสิกรรมธรรมชาติ บ้านแม่ทำ สีทา (3/2557):จับไก่เตรียมส่งให้พ่อค้า
06:00 น.	งานของกิจกรรมอาชีพ ปุ๋ยสะอาด (2/2557):จัดการกล่องปุ๋ยหมัก และเอาอีเอ็มขยายราดกล่องปุ๋ยหมัก
07:00 น.	ไปพิมพ์เอกสารที่วัดเขาแก้ว
08:00 น.	0.กินข้าวเช้า 1.กับข้าว:สะตอสด, น้ำบูดู, แกงส้มฟักเขียวปลาดุก, ผัดยอดฟักทอง
08:30 น.	งานของกิจกรรมอาชีพ กสิกรรมธรรมชาติ บ้านแม่ทำ สีทา (3/2557):นำฟักทองไปส่งร้านค้า
09:15 น.	อาบน้ำ เตรียมเดินทางไปตลาดด่านช้าง และไปเยี่ยมญาติป่วยที่อู่ทอง
09:45 น.	งานของกิจกรรมอาชีพ กสิกรรมธรรมชาติ บ้านแม่ทำ สีทา (3/2557):นำไก่แจ้คนสั่งซื้อที่ด่านช้าง
11:00 น.	แวะเอาเอกสารที่วิทยาลัยเกษตร, แวะส่งเอกสารที่ไปรษณีย์, แวะส่งเอกสารที่ กศน.ด่านช้าง, กินข้าวที่ บขส., เดินทางไปเยี่ยมญาติที่โรงพยาบาลอู่ทอง, เที่ยวกลับ, แวะซื้ออาหารปลาในตลาดด่านช้าง, เติมน้ำมันที่นาตาปิ่น, กลับถึงบ้าน
19:00 น.	0.สภาพอากาศ : ฝนตกหนัก 1.อาบน้ำ กินข้าว พักผ่อน 2. กับข้าว:สะตอสด, น้ำบูดู, แกงป่ามะเขือปลาดุก
20:00 น.	เข้านอน