ເນື້ອໃນ

# ຟັງຊັນ Switch

ປະເມີນລາຍການຂອງອາກິວເມັນ ເຊິ່ງປະກອບດ້ວຍນິພົດຕາມດ້ວຍຄ່າ. ຟັງຊັນ Switch ຈະສົ່ງຄືນຄ່າທີ່ກ່ຽວຂ້ອງກັບນິພົດທີ່ຖືກສົ່ງມາຫາຟັງຊັນນີ້.

### ໄວຍາກອນ:

    Switch (Expression1, Value1[, Expression2, Value2[..., Expression_n, Value_n]]) As Variant

### ພາຣາມິເຕີ:

ຟັງຊັນ Switch ຈະປະເມີນນິພົດຕ່າງໆຈາກຊ້າຍໄປຂວາ ແລ້ວສົ່ງຄືນຄ່າທີ່ຖືກກຳນົດໃຫ້ກັບນິພົດນັ້ນ. ຖ້ານິພົດ ແລະ ຄ່າບໍ່ໄດ້ຖືກລະບຸເປັນຄູ່, ຈະເກີດຂໍ້ຜິດພາດໃນເວລາດຳເນີນການ (runtime error).

ນິພົດ (Expression): ນິພົດທີ່ທ່ານຕ້ອງການປະເມີນ.

ຄ່າ (Value): ຄ່າທີ່ທ່ານຕ້ອງການໃຫ້ສົ່ງຄືນຖ້ານິພົດເປັນ True (ຈິງ).

ໃນຕົວຢ່າງຕໍ່ໄປນີ້, ຟັງຊັນ Switch ຈະກຳນົດເພດທີ່ເໝາະສົມໃຫ້ກັບຊື່ທີ່ຖືກສົ່ງໃຫ້ຟັງຊັນ:

### ລະຫັດຂໍ້ຜິດພາດ:

5 ການເອີ້ນໃຊ້ໂປຣຊີເຈີບໍ່ຖືກຕ້ອງ

### ຕົວຢ່າງ:

    Sub ExampleSwitch
    Dim sGender As String
        sGender = GetGenderIndex( "John" )
        MsgBox sGender
    End Sub

    Function GetGenderIndex (sName As String) As String
        GetGenderIndex = Switch(sName = "Jane", "female", sName = "John", "male")
    End Function

ຫົວຂໍ້ທີ່ກ່ຽວຂ້ອງ

ຟັງຊັນ Choose

ຄຳສັ່ງ Select...Case