-
'แปลงเดือนเป็นภาษาจีน'
ฟังก์ชั่น MonthToCH(เดือน)
สลัว มม
mm=split("หนึ่ง สอง สาม สี่ ห้า หก เจ็ด แปด เก้า สิบ สิบเอ็ด สิบสอง",")
ถ้าเป็นตัวเลข (เดือน) แล้ว
MonthToCH = มม.(เดือน-1) & "เดือน"
อื่น
MonthToCH = "เดือน"
สิ้นสุดถ้า
ฟังก์ชันสิ้นสุด
'แปลงเดือนเป็นภาษาอังกฤษแบบยาว'
ฟังก์ชั่น MonthToLongEN(เดือน)
สลัว มม
mm=split("มกราคม,กุมภาพันธ์,มีนาคม,เมษายน,พฤษภาคม,มิถุนายน,กรกฎาคม,สิงหาคม,กันยายน,ตุลาคม,พฤศจิกายน,ธันวาคม",",")
ถ้าเป็นตัวเลข (เดือน) แล้ว
MonthToLongEN = มิลลิเมตร(เดือน-1)
อื่น
MonthToLongEN = " "
สิ้นสุดถ้า
ฟังก์ชันสิ้นสุด
'แปลงเดือนเป็นภาษาอังกฤษแบบสั้น'
ฟังก์ชั่น MonthToShortEN(เดือน)
สลัว มม
mm=split("ม.ค.,ก.พ.,มี.ค.,เม.ย.,พ.ค.,มิ.ย.,ก.ค.,ส.ค.,ก.ย.,ต.ค.,พ.ย.,ธ.ค.",",")
ถ้าเป็นตัวเลข (เดือน) แล้ว
MonthToShortEN = มม.(เดือน-1)
อื่น
MonthToShortEN = " "
สิ้นสุดถ้า
ฟังก์ชันสิ้นสุด
-