Dim oRead As System.IO.StreamReader Dim Entire As String Dim a As String oRead = IO.File.OpenText("C:\temp.xml") Entire = oRead.ReadToEnd() a = Entire Dim testStr As String = a Dim rx As New Regex("(?<=\<SteamAccount\>).+(?=\<\/SteamAccount\>)") text1.Text = (rx.Match(testStr).Value)