Differenze tra le versioni di "Conoscere in un array di tipo Stringa l'elemento che contiene la quantità maggiore di caratteri"

Versione attuale delle 18:58, 4 mag 2022

Per conoscere in un array di tipo Stringa l'elemento che contiene la quantità maggiore di caratteri, si potrà utilizzare il seguente codice:

Public Sub Main()
 
 Dim ss As String[] = ["1234567890", "123", "àèéìòù", "1234567", "12345"]
 Dim s As String
 Dim cc As New Short[]
 Dim c As Short
 
 For Each s In ss
' Assegna il valore di ciascuna quantità di caratteri:
   cc.Push(String.Len(s))
 Next
' Ordina in modo "discendente" i valori presenti nel vettore di tipo "Short":
 cc.Sort(gb.Descent)

 Print
 For c = 0 To cc.Max
' Individua l'indice dell'elemento contenente la maggiore quantità di caratteri:
   If cc[0] == String.Len(ss[c]) Then Break  
 Next
 
' Mostra l'indice dell'elemento contenente la maggiore quantità di caratteri, nonché la sua stringa:
 Print "\n\nIndice:\e[31m\e[1m "; c, ss[c]

End