[dubai.eig]

(01-10-18, 02:19 AM)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 وتعني تجاهل حالة الأحرف

صباح الخير

الحمدالله ضبط معاي شكرا بارك الله فيك  الله يزيدك علما

احسنت