การใช้งาน do-while loop ในภาษา VBA แบบง่ายๆ พร้อมตัวอย่าง CODE 3 ตัวอย่าง และอธิบายการทำงาน และยกตัวอย่าง usecase ในโลกจริง

หัวข้อ: ความงามของ do-while loop ใน VBA สู่ความสามารถในการประมวลผลที่ไม่สิ้นสุด

การเขียนโปรแกรมไม่ได้มีเพียงเรื่องของการสร้างโค้ดให้ทำงานได้ถูกต้องเท่านั้น แต่ยังรวมไปถึงการสร้างโค้ดที่มีความยืดหยุ่นสามารถรับมือกับสถานการณ์ที่ไม่คาดคิดได้อีกด้วย หนึ่งในเครื่องมือที่ช่วยให้เราคุมการทำงานของโปรแกรมได้แบบทั้งหยุ่นและมั่นคงคือการใช้ loop และในภาษา VBA ที่เราใช้ในการเขียนสคริปต์เพื่อการควบคุม Excel หรือแอพพลิเคชั่น Office อื่น ๆ นั้น do-while loop เป็นหนึ่งใน loop ที่มีความสำคัญไม่น้อยไปกว่าใครเลยทีเดียว

ก่อนจะไปถึงตัวอย่างโค้ด มาทำความเข้าใจกันก่อนว่า do-while loop ทำงานอย่างไร และจะใช้ในสถานการณ์ไหนได้บ้าง แบบที่จะทำให้คุณหลงรักมันเหมือนกับที่นักโปรแกรมหลาย ๆ คนรู้สึก

พื้นฐานของ do-while loop

do-while loop เป็น loop ที่ทำงานภายใต้เงื่อนไขที่กำหนดโดยจะทำงานอย่างน้อยหนึ่งรอบก่อนที่จะตรวจสอบเงื่อนไข เนื่องจากการตรวจสอบเงื่อนไขทำตอนท้าย loop ไม่เหมือนกับ while loop ทั่วไปที่ตรวจสอบเงื่อนไขก่อนการทำงานของ loop ดังนั้น do-while loop จึงมักใช้ในสถานการณ์ที่เราต้องการให้โปรแกรมทำงานอย่างน้อยหนึ่งรอบไม่ว่าเงื่อนไขจะเป็นอย่างไร

สิ่งที่ทำให้ do-while loop มีความพิเศษก็คือวิธีการทำงานแบบนี้ที่ช่วยให้เรามั่นใจได้ว่าชุดคำสั่งภายใน loop จะได้รับการประมวลผลอย่างน้อยหนึ่งครั้ง และจะยังคงทำงานต่อไปเรื่อย ๆ จนกว่าเงื่อนไขที่ขั้นตอนท้ายจะไม่เป็นจริง

ประโยคโค้ดของ do-while loop ใน VBA จะมีลักษณะตามนี้:

Do
    ' ชุดคำสั่งที่ต้องการทำซ้ำ
Loop While [Condition]

เมื่อ `[Condition]` เป็นจริง, ชุดคำสั่งภายใน loop จะถูกทำซ้ำ แต่หาก `[Condition]` เป็นเท็จ, โปรแกรมจะทำการออกจาก loop และไปทำคำสั่งถัดไป

ตัวอย่าง CODE 1: การคำนวณสูตรคูณ

ลองนึกถึงสถานการณ์ที่เราต้องการพิมพ์ตารางสูตรคูณ 2 ออกมา โดยใช้ do-while loop ดูสิครับ:

Dim i As Integer
i = 1 ' เริ่มจาก 1
Do
    Debug.Print "2 x " & i & " = " & 2 * i
    i = i + 1
Loop While i <= 12

ในโค้ดตัวอย่างนี้, เราเริ่มด้วยการประกาศตัวแปร i แล้วทำการพิมพ์ตารางสูตรคูณของ 2 ออกมาจนถึงแม่ 12 ตามเงื่อนไขที่ระบุไว้หลังคำสั่ง `Loop While`

ตัวอย่าง CODE 2: การรับค่าจากผู้ใช้จนกว่าจะถูกต้อง

สมมติว่าเราต้องการให้ผู้ใช้ป้อนค่าตัวเลขแบบจำกัดช่วง เช่น ต้องการให้ผู้ใช้อินพุตตัวเลขที่อยู่ระหว่าง 1 ถึง 100 เราสามารถใช้ do-while loop ได้แบบนี้:

Dim value As Integer
Do
    value = InputBox("กรุณาป้อนตัวเลข (1-100):") ' ใช้ InputBox เพื่อรับค่าจากผู้ใช้
Loop While value < 1 Or value > 100

ในตัวอย่างนี้, ทุกครั้งที่ผู้ใช้ป้อนค่าที่ไม่อยู่ในช่วง 1-100, โปรแกรมจะจำใจขอให้เขาทำการป้อนข้อมูลใหม่จนกว่าเขาจะป้อนค่าที่อยู่ในช่วงที่กำหนดถูกต้อง

ตัวอย่าง CODE 3: การทำงานกับ arrays

do-while loop ยังสามารถนำมาใช้เพื่อประมวลผลข้อมูลภายใน arrays ได้ตามรายการต่อไปนี้:

Dim arr() As Variant
Dim index As Integer

' สมมุติว่าเรามี array ที่มีข้อมูลชุดหนึ่งแล้ว
arr = Array("Apple", "Banana", "Cherry", "Date")

index = LBound(arr) ' เริ่มที่ index แรกของ array
Do
    Debug.Print arr(index) ' พิมพ์ค่าของ array ที่ index นั้น
    index = index + 1
Loop While index <= UBound(arr) ' ทำต่อไปจนถึง index สุดท้ายของ array

ในตัวอย่างนี้, เราเริ่มจากตำแหน่งแรกของ array แล้วทำการพิมพ์ค่าออกมาหน้าต่อหน้าจนกระทั่งถึงค่าสุดท้ายภายใน array

Usecase ในโลกจริง

ในโลกแห่งการทำงานของเรา, do-while loop เป็นเครื่องมือที่มีค่าเสมอ เช่นในกรณีที่ต้องการตรวจสอบคุณภาพของข้อมูลจำนวนมาก, การทำ automation tasks ใน Excel, หรือแม้แต่การประมวลผลผ่านอินพุตของผู้ใช้ในแอพพลิเคชั่น Office ที่รวมถึงการสร้างหน้าจอให้ผู้ใช้พิมพ์ข้อมูลเข้ามาโดยมีการตรวจสอบเงื่อนไขที่ชัดเจน มันเป็นทักษะที่ควรมีไว้ใช้ในช่วงสถานการณ์ที่ต้องการความแน่นอนว่าอย่างน้อยหนึ่งการดำเนินงานสำคัญได้เกิดขึ้นเสมอ

โดยสรุป, เรียนรู้เพิ่มเติมเกี่ยวกับการใช้งาน do-while loop ใน VBA และการประยุกต์ใช้ในสถานการณ์ต่างๆ นั้นก็คือการเปิดโอกาสให้คุณบริหารจัดการกับโค้ดที่มีความซับซ้อนถึงขีดความสามารถบางอย่างที่ต้องการความแม่นยำและความยืดหยุ่น ที่ EPT (Expert-Programming-Tutor) เราไม่เพียงแค่ช่วยให้คุณเรียนรู้เชิงทฤษฎีเท่านั้น แต่ยังช่วยให้คุ

นสามารถประยุกต์ใช้ทักษะต่างๆ เหล่านี้ลงในสถานการณ์จริงและสร้างผลงานที่มีคุณภาพด้วยตัวคุณเอง หากคุณสนใจที่จะต่อยอดความสามารถในการเขียนโปรแกรมของคุณ, เรายินดีต้อนรับคุณเข้าสู่ EPT ที่คุณจะได้พบกับการเรียนรู้ที่ไม่มีขีดจำกัด!

หมายเหตุ: ข้อมูลในบทความนี้อาจจะผิด โปรดตรวจสอบความถูกต้องของบทความอีกครั้งหนึ่ง บทความนี้ไม่สามารถนำไปใช้อ้างอิงใด ๆ ได้ ทาง EPT ไม่ขอยืนยันความถูกต้อง และไม่ขอรับผิดชอบต่อความเสียหายใดที่เกิดจากบทความชุดนี้ทั้งทางทรัพย์สิน ร่างกาย หรือจิตใจของผู้อ่านและผู้เกี่ยวข้อง