Salve, ho questo problema... spiego,,, carico con OFD vari file che dovrebbero contenere solo valori numerici, uno di questi o piu contiene anche dei valori di testo, questi ultimi non devono essere caricati ma saltati, ammettiamo che carico il primo file che é Testuale/Numerico, ed un altro che è solo numerico, il primo file con percorso indice 0 deve essere eliminato, in questo caso con il mio codice funziona... ma se io carico prima quello solo Numerico poi quello Testuale /Numerico di conseguenza l'indice essendo sempre 0 mi elimina quello buono e quindi poi da errore
Dim index AsInteger = nomiFiles.Count() - 1
For i AsInteger = 0 To nomiFiles.Count() - 1 Step 1 'Ciclo i Percorsi
Dim lines AsString() = File.ReadAllLines(nomiFiles(index)) 'popolo gli array
ForEach c In lines
IfNot IsN(c) Then' verifico che il valore sia numerico
nomiFiles.RemoveAt(i - 1)
index = i - 1
Exit For
EndIf
Next
index -= 1
Next
For i AsInteger = 0 To nomiFiles.Count() - 1 Step 1 'Ciclo i Percorsi
Dim lines AsString() = File.ReadAllLines(nomiFiles(index)) 'popolo gli array
ForEach c In lines
IfNot IsN(c) Then' verifico che il valore sia numerico
nomiFiles.RemoveAt(i - 1)
index = i - 1
Exit For
EndIf
Next
index -= 1
Next
PrivateSharedFunction IsN(ByVal Expression AsObject) AsBoolean
'Controlla se un valore è numerico
Dim isNum AsBoolean
isNum = IsNumeric(Expression)
Return isNum
EndFunction
'Controlla se un valore è numerico
Dim isNum AsBoolean
isNum = IsNumeric(Expression)
Return isNum
EndFunction
come devo fare per poter eliminare solo quello non Numerico e continuare a ciclare e verificare se non ce ne siano altri Percorsi con file non numerici da eliminare ?