Choose
Da Gambas-it.org - Wikipedia.
La funzione Choose restituisce il valore scelto all'interno di una lista posta fra parentesi.
Public Sub Button1_Click()
Dim x, b As Byte
Dim s As String
x = InputBox("Immetti un numero fra 1 e 4:")
s = “Stringa1”
b = 38
' Sarà restituito il valore dell'elemento della lista corrispondente - nell'ordine di posizione da sinistra - al numero immesso in x:
Print Choose(x, “Stringa2”, 38, s, b)
End
La funzione Choose supporta direttamente stringhe (da porre ovviamente fra virgolette), valori numerali, nonché variabili.
