Module
Contents
Index 🔎︎

# Select...Case Statement

កំណត់​បណ្តុំ​សេចក្តី​ថ្លែង​ការណ៍​មួយ ឬ​ច្រើន​ ដោយ​ផ្អែក​លើ​តម្លៃ​នៃ​កន្សោម​មួយ​ ។

## វាក្យ​សម្ពន្ធ ៖

    Select Case condition Case expression Statement Block [Case expression2 Statement Block][Case Else] Statement Block End Select

## ប៉ារ៉ាម៉ែត្រ ៖

Condition ៖ កន្សោម​មួយ​ចំនួន​ ដែល​ត្រួតត្រា​ប្រសិន​បើ​បណ្តុំ​សេចក្តី​ថ្លែង​ការណ៍ ដែល​នៅ​បន្ត​ពី​អនុ​ប្រយោគ Case រៀង​ៗ​ខ្លួន​ត្រូវ​បាន​ប្រតិបត្តិ ។

Expression ៖ កន្សោមមួយ​ចំនួន​ ដែល​ឆប​គ្នា​ជាមួយ​កន្សោម​ប្រភេទ​លក្ខខណ្ឌ ។ បណ្តុំ​សេចក្តី​ថ្លែង​ការណ៍ ដែល​នៅ​ក្រោយ​អនុ​ប្រយោគ Case ត្រូវ​បាន​ប្រតិបត្តិ​ ប្រសិន​បើ លក្ខខណ្ឌ ផ្គូផ្គង កន្សោម ។

## ឧទាហរណ៍ ៖

    Sub ExampleRandomSelect
    Dim iVar As Integer
        iVar = Int((15 * Rnd) -2)
        Select Case iVar
            Case 1 To 5
                Print "Number from 1 to 5"
            Case 6, 7, 8
                Print "Number from 6 to 8"
            Case 8 To 10
                Print "Greater than 8"
            Case Else
                Print "Out of range 1 to 10"
        End Select
    End Sub