Differenze tra le versioni di "Choose"

Da Gambas-it.org - Wikipedia.
(Nuova pagina: 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 a$ As String x =...)
 
Riga 7: Riga 7:
 
   Dim a$ As String
 
   Dim a$ As String
 
   
 
   
   x = 4
+
   x = InputBox("Immetti un numero fra 1 e 4:")
 
   
 
   
 
   a$ = “Stringa1”
 
   a$ = “Stringa1”

Versione delle 18:04, 10 ago 2012

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 a$ As String

  x = InputBox("Immetti un numero fra 1 e 4:")

  a$ = “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, a$, b)

End


La funzione Choose supporta direttamente stringhe (da porre ovviamente fra virgolette), valori numerali, nonché variabili.