Gambas-it

Archivi (sola lettura) => Programmazione (Gambas 2) => Topic aperto da: Ferdinando88 - 26 Marzo 2012, 11:26:28

Titolo: SELECT CASE
Inserito da: Ferdinando88 - 26 Marzo 2012, 11:26:28
Come faccio ad usare SELECT CASE con una combobox ?
Titolo: Re: SELECT CASE
Inserito da: Ferdinando88 - 26 Marzo 2012, 11:32:21
Mi spiego meglio, vorrei utilizzare il select case in modo da non dover scrivere nel codice il testo della combobox ma solo caso 1 2 3 ecc....
Titolo: Re: SELECT CASE
Inserito da: fsurfing - 26 Marzo 2012, 12:58:31
puoi usare la proprietà index che indica l' indice dell' elemento selezionato nella combo
Titolo: Re: SELECT CASE
Inserito da: vuott - 26 Marzo 2012, 23:37:19
puoi usare la proprietà index che indica l' indice dell' elemento selezionato nella combo

Dopo aver contattato appositamente l'amico fsurfing, provvedo alla parte pratica della efficace e veloce soluzione da lui indicata, ossia a scrivere il codice. Ciò affinché utenti - come me - meno esperti, che si trovano a leggere questo messaggio, possano avere subito - appunto - l'aspetto pratico, la guida pratica, di quanto descritto teoricamente da fsurfing.

Poniamo di avere sul form un ComboBox con una lista di 4 elementi. In ogni elemento della predetta lista vi sarà scritto qualcosa. L'obiettivo è sostanzialmente quello prefissato da Ferdinando88, da raggiungere con il suggerimento dato da fsurfing.
Codice: gambas [Seleziona]

Public Sub ComboBox1_Click()  ' oppure anche ComboBox1_Change()

' La "selezione" avverrà verificando la proprietà .Index dell'oggetto ComboBox,
' ossia sulla base appunto dell'indice numerico degli elementi di quell'oggetto.
' Partiamo da zero, poiché l'indice della lista del ComboBox parte da zero:
  Select Case ComboBox1.Index
  Case 0
' come mero esempio didattico andiamo a scrivere in console
' il testo che è riportato nel 1° elemento:
    Print ComboBox1.Text
  Case 1
' qui quello che è riportato nel 2° elemento:
    Print ComboBox1.Text
  Case 2
' qui quello che è riportato nel 3° elemento:
    Print ComboBox1.Text
  Case 3
' qui quello che è riportato nel 4° elemento:
    Print ComboBox1.Text
End Select

End


Come sempre, fsurfing, ha dato un'ottima soluzione, breve e pulita.
Titolo: Re: SELECT CASE
Inserito da: Top Fuel - 26 Marzo 2012, 23:40:58
E sopratutto di una facilità disarmante. :ok:
Titolo: Re: SELECT CASE
Inserito da: Ferdinando88 - 27 Marzo 2012, 08:44:10
Ringrazio tutti per l'aiuto...la soluzione funziona e mi è incredibilmente utile. :-)