Tengo muchos archivos de texto en una carpeta. Lo que puedo hacer ahora es leer un texto a la vez e insertarlo en la base de datos. Mi pequeña aplicación lee un archivo de texto cuando lo depuro. Por lo tanto, necesito ejecutarlo varias veces para leer todos esos archivos de texto e importarlos a la base de datos.

Mi pregunta es cómo leer múltiples archivos de texto dentro de una carpeta a la vez. Aquí está mi código que funciona bien pero lee solo un archivo de texto a la vez.

Private Sub btnRead_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnRead.Click

        Dim filelocation As String
        filelocation = "F:\txtfiles\ch25.txt"
        Dim chid As Integer
        chid = 25



        'read from file'
        Dim MyStream As New StreamReader(Path.Combine(Application.StartupPath, filelocation))
        Dim vArray() As String = MyStream.ReadToEnd.Split(CChar("$"))
        MyStream.Close()



        Dim count As Integer

        'insert text to table'
        For d As Integer = 0 To vArray.Length - 1 Step 1

            If d = vArray.Length - 1 Then
                Exit For
            End If

            InsertKh(chid, d + 1, vArray(d))
            count = d + 1
        Next


       MsgBox ("Done Inserting")

End Sub

Obviamente, necesito una forma de recorrer una carpeta y verificar si hay un archivo de texto. Pero no puedo hacerlo bien. ¿Alguien puede mostrarme algún código o enlaces? Estoy usando VB.NET, .NET 3.5

Muchas gracias