ฟังก์ชัน Choose

ส่งกลับค่าจากรายการอาร์กิวเมนต์

ไวยากรณ์

Choose(index, choice-1 [, choice-2] ... [, choice-n])

ฟังก์ชัน Choose มีอาร์กิวเมนต์ดังนี้

อาร์กิวเมนต์	คำอธิบาย
index	จำเป็น นิพจน์ตัวเลขหรือเขตข้อมูลที่ให้ผลลัพธ์เป็นค่าระหว่าง 1 และจํานวนของตัวเลือกที่พร้อมใช้งาน
choice	จำเป็น นิพจน์ตัวแปรที่มีหนึ่งในตัวเลือกที่เป็นไปได้

ข้อสังเกต

Chooseส่งกลับค่าจากรายการตัวเลือกโดยยึดตามค่าของindex ถ้า index เป็น 1 จะ Choose ส่งกลับตัวเลือกแรกในรายการ ถ้า index เป็น 2 จะส่งกลับตัวเลือกที่สอง และอื่นๆ

คุณสามารถใช้ Choose เพื่อค้นหาค่าในรายการของความเป็นไปได้ ตัวอย่างเช่น ถ้า index ประเมินเป็น 3 และ choice-1 = "one" choice-2 = "two" และ choice-3 = "three" Choose จะส่งกลับ "three" ลักษณะการทํางานนี้มีประโยชน์เมื่อ index แทนค่าในกลุ่มตัวเลือก

Choose จะประเมินทุกตัวเลือกในรายการ แม้ว่าจะส่งกลับเพียงตัวเลือกเดียวก็ตาม เนื่องจากพฤติกรรมนี้ดูผลข้างเคียงที่ไม่ต้องการ ตัวอย่างเช่น ถ้าคุณใช้ MsgBox ฟังก์ชันเป็นส่วนหนึ่งของนิพจน์ในตัวเลือกทั้งหมด Access จะแสดงกล่องข้อความสําหรับแต่ละตัวเลือกเมื่อฟังก์ชันประเมินได้ ถึงแม้ว่า Choose จะส่งกลับค่าเพียงตัวเลือกเดียวก็ตาม

ฟังก์ชัน Choose จะ Null ส่งกลับถ้า index น้อยกว่า 1 หรือมากกว่าจํานวนของตัวเลือกที่แสดงในรายการ

ถ้า index ไม่ใช่จํานวนเต็ม Access จะปัดเศษเป็นจํานวนเต็มที่ใกล้ที่สุดก่อนที่จะประเมินค่า

ตัวอย่างคิวรี

นิพจน์	ผลลัพธ์
SELECT Choose(3,"Jan","Feb","Mar","Apr","May","Jun","Jul","Aug","Sep","Oct","Nov","Dec") AS Expr1 FROM ProductSales;	ส่งกลับค่าที่สามจากรายการค่า ผลลัพธ์: "มี.ค."
SELECT DateofSale, Choose(Month(DateofSale),"Jan","Feb","Mar","Apr","May","Jun","Jul","Aug","Sep","Oct","Nov","Dec") AS MonthName FROM ProductSales;	ส่งกลับค่าใน DateofSale และชื่อเดือนที่สอดคล้องกันใน MonthName คอลัมน์ Month(DateofSale) ส่งกลับจํานวนเดือนสําหรับ DateofSaleและใช้ Choose ตัวเลขนั้นเป็นดัชนีสําหรับรายการตัวเลือก

ตัวอย่าง VBA

ตัวอย่างนี้ใช้ Choose ฟังก์ชันเพื่อแสดงชื่อสําหรับดัชนีที่กระบวนงานผ่านใน Ind พารามิเตอร์

Function GetChoice(Ind As Integer)
    GetChoice = Choose(Ind, "Speedy", "United", "Federal")
End Function