[الطالب]

سلام

جرب هذه

كود :

Dim a As String = Regex.Match(TextBox1.Text, "([A,a]).*(?=[B,b])").Value
Dim b As String = Regex.Match(TextBox1.Text, "([B,b]).*(?=[C,c])").Value
Dim c As String = Regex.Match(TextBox1.Text, "([C,c]).*").Value

موفقين