Funzione Scan

[vuott]

Insomma Scan funziona un po così così

In che senso ?   

[Gianluigi]

Insomma Scan funziona un po così così

In che senso ?   

I titoli di colonna non rispettano le colonne dei dati sottostanti, lo vedi molto chiaramente nel mio codice ultimo.
 

[Gianluigi]

Si può rimediare così:

Codice: [Seleziona]

Public Sub Main()

  Dim sRisultato As String
  Dim sLinea As String
  Dim sElt As String
  Dim b As Byte
  Dim ss As String[]
  Dim i As Integer
  
  Exec ["df"] To sRisultato
  ss = Split(sRisultato, "\n")
  Print "File system     |"; "1k-blocchi      |"; "Usati           |"; "Disponibili     |"; "Uso%            |"; "Montato su      |"
  For i = 1 To ss.Max
    sLinea = ss[i]
    Print "-----------------------------------------------------------------------------------------------------"
    For Each sElt In Scan(sLinea, "* * * * * *")
      b = (16 - Len(sElt))
      Print sElt; Space(b); "|";      
    Next
    Print
  Next
  
End

 

[vuott]

Sì, ma non capisco cosa c'entri Scan( ).   

[Gianluigi]

Sì, ma non capisco cosa c'entri Scan( ).   

Hai ragione così come ho scritto sembra una critica alla funzione, invece la mia è una critica all'esempio che, errori a parte, non mi sembra calzante.

[kicco]

... allora quanti punti  mi date?

[Gianluigi]

... allora quanti punti  mi date?

  Non saprei, dipende da quanto è profondo e largo il taglio 

 

[vuott]

Non saprei, dipende da quanto è profondo e largo il taglio 

Oh... 'sti Genovesi so' tremendi !   

[kicco]

Non saprei, dipende da quanto è profondo e largo il taglio 

... e molla 'sti punti!!!

Oh... 'sti Genovesi so' tremendi !   

appunto!!