codice:
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click          
Using MyReader As New Microsoft.VisualBasic.FileIO.TextFieldParser("C:\Accessi\ArchivioGenerale\ArchivioEntrateUscite.txt")
MyReader.TextFieldType = FileIO.FieldType.Delimited 
MyReader.SetDelimiters(",")             
Dim currentRow As String()             
While Not MyReader.EndOfData                 
Try                     
currentRow = MyReader.ReadFields()                     
Dim data = DateTime.ParseExact(currentRow(0), "dd-MM-yyyy", _ System.Globalization.CultureInfo.InvariantCulture) data.Date (>= DateTimePicker1.Value.Date 'AndAlso data.Date <= DateTimePicker2.Value.Date)                     
If currentRow(0) = ComboBox2.Text AndAlso currentRow(1) >= DateTimePicker1.Value.Date AndAlso currentRow(1) <= DateTimePicker2.Value.Date Then
TextBox1.Text = currentRow(4)                         
Exit While                     
End If                 
Catch ex As Microsoft.VisualBasic.FileIO.MalformedLineException                     
MsgBox("Line " & ex.Message & "is not valid and will be skipped.")                 
End Try                 
End While         
End Using     
End Sub
Riferimento al primo messaggio, per Gibra non Capisco Quindi???? quello che chiedo gentilmente non deve essere di far sentire le persone di basso livello, anche se sono alle prime armi, e faccio di tutto per imparare chiedo umilmente un aiuto, se fossi bravo, non sarei in questo sito, scusate
quello che ho scritto e una forma un po oggettiva...