Объявление общих переменных в процедуре, а не в Public Class

  
Public Class Form1
   Dim SR1 As New System.IO.StreamReader("C:\тест1.txt")
     Dim SR2 As New System.IO.StreamReader("C:\тест2.txt")
     Dim SR3 As New System.IO.StreamReader("C:\тест3.txt")
     Dim SR4 As New System.IO.StreamReader("C:\тест4.txt")
'и т.д.
 
'Потом в список combobox1 нужно добавить первые строки из этих текстовых файлов:
Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
     ComboBox1.Items.Add(SR1.ReadLine)
     ComboBox1.Items.Add(SR2.ReadLine)
     ComboBox1.Items.Add(SR3.ReadLine)
     ComboBox1.Items.Add(SR4.ReadLine)
'и т.д.
End Sub
 
end class

Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
 
End Sub

If Название_файла.StartsWith("тест") = true Then 'Запись в файл

 Dim oExcel As Object = CreateObject("Excel.Application")
    Dim Пойманный_файл As String 'Название файла который начинается на "тест"
    Dim Чтение_из_файла As New IO.StreamReader(Пойманный_файл, True)
    Dim Название_файла As String
 
    Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
 
'перебираем файлы и если...
 
        If Название_файла.StartsWith("test") = True Then
            Пойманный_файл = Название_файла
            TextBox1.Text = Чтение_из_файла.ReadLine
        End If