[rnmr]

بما أنك تستخدم Regex جرب هذا

كود :

Dim fd As OpenFileDialog = New OpenFileDialog() With {.Filter = "ADI files (*.ADI)|*.ADI"}
If fd.ShowDialog() = DialogResult.OK Then
   lblAttach.Text = fd.FileName
   txt = IO.File.ReadAllText(fd.FileName)
   MS = Regex.Split(txt, "<eor>", RegexOptions.IgnoreCase)
End If

لاحظ RegexOptions.IgnoreCase وتعني تجاهل حالة الأحرف