Chiedo gentilmente un vostro aiuto, ho creato un form dove devo effettuare una ricerca contenuta nel file di testo e la voglio visualizzare dentro una casella textbox, nel form ho creato una combobox con dentro i nomi delle persone e due caselle DateTimePiker, in modo che quando seleziono il nome, data di ingresso, data di uscita di un determinato giorno, vorrei che comparissero dentro la textbox. Es. 19/12/2008 entrato pinco pallino macchina rolls royce etc..
posto qui il codice:
Private Sub Ricerca_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Ricerca.Click
Using MyReader As New _
Microsoft.VisualBasic.FileIO.TextFieldParser("C:\A ccessi\ArchivioGenerale\ArchivioEntrateUscite.txt" )
MyReader.TextFieldType = FileIO.FieldType.Delimited
MyReader.SetDelimiters(",")
Dim currentRow As String()
While Not MyReader.EndOfData
Try
currentRow = MyReader.ReadFields()
If currentRow(0) = ComboBox2.Text AndAlso currentRow(1) >= DateTimePicker1.Value.Date AndAlso currentRow(1) <= DateTimePicker2.Value.Date Then
TextBox1.Text = currentRow(0)
Exit While
End If
Catch ex As Microsoft.VisualBasic.FileIO.MalformedLineExceptio n
MsgBox("Line " & ex.Message & "is not valid and will be skipped.")
End Try
End While
End Using
End Sub
grazie