สวัสดีครับกลับมาพบกันอีกในบทความนี้ เนื่องจากมีเพื่อนคนนึงมาปรึกษาผมว่าอยากจะเขียนโปรแกรมด้วยภาษา vb เพื่อหาวันที่สุดท้ายของทุกๆเดือนในปีที่เรากําหนดได้อย่างไร ผมจึงหาวิธีการเขียนจนได้ และนํามาแบงปันเพื่อนๆ ได้ศึกษากันครับ ตัวอย่าง ถ้าเราต้องการหาวันสุดท้ายของแต่ละเดือนในปี 2017 เราจะได้ผลออกมาประมาณนี้ครับ
วิธีที่ผมจะนําเสนอดังต่อไปนี้สามารถบอกได้ถึงแม้ว่าเป็นปี Leave Year มาดู function ที่ผมเขียนเป็นตัวอย่าง
Function getLastDayOfAllMunth(ByVal year As Long) As String()
Dim thisYear = New DateTime(year, 1, 1)
Dim lastDayOfAllMonth(11) As String
For i As Integer = 0 To lastDayOfAllMonth.Length - 1
lastDayOfAllMonth(i) = thisYear.AddMonths(i + 1).AddDays(-1).ToString("dd/MM/yyyy")
Next
Return lastDayOfAllMonth
End Function
จริงๆแล้วสามารถนํา Function นี้ไปใช้ได้เลยครับ โดย Function จะ Return เป็น Array ออกมา แต่ผมจะอธิบาย Code คร่าวๆ เพื่อใครจะนําไปประยุกต์ใช้ การทํางานของ Code คือ เริ่มด้วยสร้าง Object ของ DateTime เป็นวันที่ 1/1/ปีที่ต้องการ หลังจากนั้นเราจะเพิ่มเดือนเข้าไป 1 เดือน แล้วลบจํานวนวันไป 1 วัน เราจะได้วันสุดท้ายของเดือน 1 เพิ่มเดือนลักษณะนี้ไปเรื่อยๆจนครบ 12 เดือน เราก็จะได้วันสุดท้ายของทุกๆเดือนในปีนั้นๆ Project ตัวอย่างที่นี่ครับ github.com/mrthiti/LastDayOfEachMonth
ปัจจุบันตัวเก็บประจุถูกผลิตออกมามากมายหลายแบบ ประเภทของตัวเก็บประจุที่พบส่วนใหญ่มีดังนี้Tantalum electrolytic capacitorsCeramic capacitorsSilver mica capacitorsMylar capacitorsBipolar capacitorsElectrolytic capacitors
Redux เป็น Library ที่จะช่วยควบคุมการไหลของข้อมูลใน Application ของเราให้ดีขึ้น ซึ่งจะช่วยให้เราคาดการได้ว่าเมื่อเกิดเหตุการณ์ใดใน Component แล้วจะมีผลอะไรกับ Application ของเราบ้าง ถ้ายังนึกภาพไม่ออกให้ดูรูปนี้
เหรียญ 1 บาท เนื่องในวันอาหารโลก พ.ศ.2525 องค์การอาหารและเกษตรแห่งสหประชาชาติขอความร่วมมือให้กรมธนารักษ์จัดทำเหรียญกษาปณ์ที่ระลึกเนื่องในวันอาหารโลก องค์การอาหารและเกษตรแห่งสหประชาชาติเป็นองค์การระหว่างประเทศที่ดำเนินการเกี่ยวกับการเพิ่มผลผลิตในการเกษตรให้มากยิ่งขึ้น เพื่อมิให้ประชากรของโลกขาดแคลนอาหาร และเนื่องด้วยวันที่ 16 ตุลาคม พ.ศ. 2524 เป็นวันฉลองการก่อตั้งองค์การอาหารและการเกษตรแห่งสหประชาชาติ ครบปีที่ 36 องค์การ ฯ จึงถือเอาวันที่