MyBanner

โฆษณา

วันพุธที่ 9 กรกฎาคม พ.ศ. 2557

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



ชุดคำสั่ง : CCur
ประเภทชุดคำสั่ง : Function
      ทำหน้าที่ แปลงค่าข้อมูลที่กำหนด (เป็นข้อความ หรือค่าตัวเลข) ให้เป็นค่าข้อมูลตัวเลขจำนวนเงิน (Currency symbols)
รูปแบบชุดคำสั่ง :
           CCur(Expression)
ค่าที่ส่งกลับ : Currency
พารามิเตอร์ :
           Expression หมายถึง ค่าข้อมูลที่ต้องการแปลงเป็นค่าตัวเลขแบบจำนวนเงิน

ชุดคำสั่ง : CBool
ประเภทชุดคำสั่ง : Function
      ทำหน้าที่ แปลงค่าข้อมูลที่กำหนด ที่ได้จากการเปรียบเทียบของค่าข้อมูล หรือ ค่าตัวเลขให้เป็นค่าจริง (True) หรือ ค่าเท็จ (False) ในกรณีที่ค่าข้อมูลที่นำมาแปลงเป็นค่าตัวเลข ถ้ามีค่าเป็น 0 จะให้ผลเป็นค่าเท็จ ส่วนค่าตัวเลขอื่นๆ จะให้ผลเป็นค่าจริง
รูปแบบชุดคำสั่ง :
           CBool (Expression1 {= | <> | < | > | <= | >=} Expression2)
           หรือ CBool (Number)
ค่าที่ส่งกลับ : Bool
พารามิเตอร์ :
           Expression1 หมายถึง ค่าข้อมูลที่เป็นตัวตั้งในการเปรียบเทียบ
           Expression2 หมายถึง ค่าข้อมูลที่เป็นตัวดำเนินการเปรียบเทียบ
           Number หมายถึง ค่าตัวเลขที่ต้องการแปลงข้อมูล
รหัสข้อผิดพลาด :
           5 Invalid procedure call (ดูรายละเอียดเพิ่มเติมที่ชุดคำสั่ง Error)
ตัวอย่าง :
SUB subExampleCBool
         Dim iA As Integer, iB As Integer, iC As Integer, bTest As Boolean
         Dim vResult
         Dim sDisplayText As String
         iA = 5 : iB = 0 : iC = -3 : bTest = True

         sDisplayText = "iA = 5, iB = 0, iC = -3, bTest = True" & Chr(13) & Chr(13)

         vResult = CBool(iC < iA)
         sDisplayText = sDisplayText & "ค่าของคำสั่ง CBool(iC < iA) คือ " & _
         vResult & Chr(13)
         vResult = CBool(iA)
         sDisplayText = sDisplayText & "ค่าของคำสั่ง CBool(iA) คือ " & _
         vResult & Chr(13)
         vResult = CBool(iB)
         sDisplayText = sDisplayText & "ค่าของคำสั่ง CBool(iB) คือ " & _
         vResult & Chr(13)
         vResult = CBool(iC)
         sDisplayText = sDisplayText & "ค่าของคำสั่ง CBool(iC) คือ " & _
         vResult & Chr(13)
         vResult = CBool(bTest)
         sDisplayText = sDisplayText & "ค่าของคำสั่ง CBool(bTest) คือ " & _
         vResult & Chr(13)

         MsgBox sDisplayText
END SUB

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

ชุดคำสั่ง : CDate
ประเภทชุดคำสั่ง : Function
      ทำหน้าที่ แปลงข้อมูลที่อยู่ในรูปข้อความหรือตัวเลขเป็นข้อมูลแบบ Date โดยในกรณีที่ข้อมูลที่จะแปลงเป็น Date เป็นข้อความเนื้อหาข้อมูลจะต้องอยู่ในรูป MM.DD.YYYY HH.MM.SS ในกรณีที่เป็นตัวเลขจะเป็นการคำนวณหาค่าวันเวลาที่โดยเริ่มนับตั้งแต่วันที่ 31 เดือนธันวาคม ค.. 1899
รูปแบบชุดคำสั่ง :
           CDate (Expression)
ค่าที่ส่งกลับ : Date
พารามิเตอร์ :
           Expression หมายถึง ค่าข้อมูลที่เป็นข้อมูลแบบ Date
รหัสข้อผิดพลาด :
           5 Invalid procedure call (ดูรายละเอียดเพิ่มเติมที่ชุดคำสั่ง Error)
ตัวอย่าง :
SUB subExampleCDate
         Dim sDisplay As String
         Dim sDateString As String

         sDateString = "30.06.2007"
         sDisplay = "ค่าของ CDATE(1025.25) คือ " & cDate(1025.25) & Chr(13)
         sDisplay = sDisplay & "ค่าของ CDATE(sDateString) คือ " _
                              & CDATE(sDateString)

         MsgBox sDisplay
END SUB

รูปที่ 11 ภาพตัวอย่างการทำงานของซับรูทีน subExampleCDate
ชุดคำสั่ง : CDec
ประเภทชุดคำสั่ง : Function
      ทำหน้าที่ แปลงค่าข้อมูลที่เป็นข้อความหรือตัวเลข เป็นค่าตัวเลขแบบ decimal
รูปแบบชุดคำสั่ง :
           CDec(Expression)
ค่าที่ส่งกลับ : Decimal number.
พารามิเตอร์ :
           Expression หมายถึง ค่าข้อมูลที่ต้องการแปลงเป็นค่าตัวเลขแบบ decimal

ชุดคำสั่ง : CDbl
ประเภทชุดคำสั่ง : Function
      ทำหน้าที่ แปลงค่าข้อมูลที่เป็นข้อความหรือตัวเลข เป็นค่าตัวเลขแบบ double โดยค่าข้อมูลที่เป็นข้อความที่จะแปลงเป็นค่าตัวเลขแบบ double จะต้องเป็นข้อความของตัวเลขเช่น “1735.2” เป็นต้น
รูปแบบชุดคำสั่ง :
            CDbl (Expression)
ค่าที่ส่งกลับ : Double
พารามิเตอร์ :
            Expression หมายถึง ค่าข้อความที่ต้องการแปลงเป็นค่าตัวเลขแบบ Double
รหัสข้อผิดพลาด :
            5 Invalid procedure call (ดูรายละเอียดเพิ่มเติมที่ชุดคำสั่ง Error)

ชุดคำสั่ง : CInt
ประเภทชุดคำสั่ง : Function
      ทำหน้าที่แปลงค่าข้อมูลที่เป็นข้อความ หรือ ค่าตัวเลขให้เป็นค่าตัวเลขแบบ Integer โดยกรณีที่เป็นเลขทศนิยม ผลลัพธ์ที่ได้จะเป็นเลขจำนวนเต็มที่ใกล้เคียงกับค่าเดิมมากที่สุด (โดยการปัดค่าตัวเลข) และในกรณีที่เป็นค่าตัวเลขที่อยู่นอกช่วง -32768 ถึง 32767 OpenOffice.org Basic จะแสดงข้อผิดพลาดเป็น overflow error สำหรับกรณีที่เป็นข้อความจะต้องอยู่ในรูปข้อความตัวเลข เช่น “135.5” เป็นต้น
รูปแบบชุดคำสั่ง :
            CInt (Expression)
ค่าที่ส่งกลับ : Integer
พารามิเตอร์ :
            Expression หมายถึง ค่าข้อมูลที่จะแปลงค่าเป็นตัวเลขแบบ Integer
รหัสข้อผิดพลาด :
            5 Invalid procedure call (ดูรายละเอียดเพิ่มเติมที่ชุดคำสั่ง Error)

เทรด forex กับ exness


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

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



Adz2you.