Microsoft Visual Basic 6/Select

Microsoft Visual Basic 6
	Select

O seguinte é un exemplo do uso desta instrución de control:

Select Case Index
  Case 0
    a = b + c
  Case 1
    a = d
  Case Else
    a = a + 1
End Select

Microsoft Visual Basic 6
	Select