The VB 6
Choose() function is another function that let you choose values based on an index. However, do not confuse it to be an array. The
Choose () function is very useful in menu based program where you can display a menu and let user input there choice.
When the user makes a choice, the value corresponding to the choice is returned and stored in another variable. Let us see the syntax for
Choose () function.
Dim Variable As String Variable = Choose(indexNo, "Value1", "Value2", "Value")
The value in the above program could be numbers. We have chosen the string type to demonstrate the usage.
Example Program: Choose() Function
In this example, we will read an input number and based on the input, the program will find the name of the student and display it on the screen.
Private Sub Command1_Click() Dim indexNo As Integer Dim Student As String indexNo = -1 indexNo = InputBox("Enter a Number between 1 - 5, Enter 0 to end") If indexNo >= 1 Then Student = Choose(indexNo, "Peter", "Ram", "Mary", "Abdul", "Lee") End If If indexNo = 0 Then End End If MsgBox ("Student Name is" & " " & Student) End Sub
Output: Choose () Function
The output of the program is the name of the student whose index number matches in the