TextBox1.Text = System.Text.RegularExpressions.Regex.Replace(Label4.Text, ",.*")
While sr.Peek() > -1 Dim rs As String = sr.ReadLine() If rs.Contains("Structure.Load(") Then rs = System.Text.RegularExpressions.Regex.Replace(rs, "\s*Structure\.Load\(", "") rs = System.Text.RegularExpressions.Regex.Replace(rs, "\)\;", "") rs = map.Replace(Path.GetFileName(map), rs) bve_structure = rs End If End While