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 SubUser Input
Output: Choose () Function
The output of the program is the name of the student whose index number matches in the Choose() function.
