Proprietà List di ComboBox

[Gianluigi]

Così come recita la guida in linea, la proprietà list restituisce una copia e pertanto apportare cambiamenti non sortisce effetto alcuno.
Pertanto il codice

Codice: [Seleziona]

ComboBox1.List.Sort(gb.Ascent)

non va.
Ora memore del fatto che a qualcuno di voi il codice:

Codice: [Seleziona]

 s = Vettore stringa popolato : ComboBox1.List = s

non funzionava vi prego gentilmente di provare questo codice che a me funziona e riferirmi se funziona anche a voi, grazie

Codice: [Seleziona]

Public Sub Form_Open()

  Dim s As String[]
  
  ComboBox1.Add("Topolino")
  ComboBox1.Add("Pippo")
  ComboBox1.Add("Clarabella")
  ComboBox1.Add("Minni")
  ComboBox1.Add("Gastone")  
  s = ComboBox1.List
  s.Sort(gb.Ascent)
  ComboBox1.List = s
  ComboBox1.Index = 0  

End

[kicco]

 
Se per funziona intendi che i nomi appaiono nella lista in ordine alfabetico, allora sì, funziona!
 

[Gianluigi]

  

 

[vuott]

Funziona anche così:

Codice: [Seleziona]

Public Sub Form_Open()
  
  ComboBox1.Add("Topolino")
  ComboBox1.Add("Pippo")
  ComboBox1.Add("Clarabella")
  ComboBox1.Add("Minni")
  ComboBox1.Add("Gastone")  

  ComboBox1.List = ComboBox1.List.Sort(gb.Ascent)
  ComboBox1.Index = 0  

End

[Gianluigi]

Funziona anche così:

Codice: [Seleziona]

Public Sub Form_Open()
  
  ComboBox1.Add("Topolino")
  ComboBox1.Add("Pippo")
  ComboBox1.Add("Clarabella")
  ComboBox1.Add("Minni")
  ComboBox1.Add("Gastone")  

  ComboBox1.List = ComboBox1.List.Sort(gb.Ascent)
  ComboBox1.Index = 0  

End

Ciao Vuott, 
giuro che l'avevo provato e non aveva funzionato.
Probabilmente ho sbagliato a scrivere (spesso mi capita di scrivere ComboBox al posto di ComboBoxN) 
Funziona ed è meglio così.
Grazie
 

[vuott]

giuro che l'avevo provato e non aveva funzionato.

....ti punirà una bionda dominatrice: