Want to be a web developer? You'll need to know HTML. Prepare for HTML5 certification by enrolling in July's Course of the Month! It's free for Premium Members, Team Accounts, and Qualified Experts.
If True Then Dim line As String Dim sr As New StreamReader(tableselected) Dim table As String = "" For x As Integer = 0 To 1000 line = sr.ReadLine() If line Is Nothing Then 'if the file is over, exit the for loop table = table.TrimEnd(","c) Exit For End If Dim searchWithinThis As String = line Dim searchForThis As String = "0;" '= index & ";" 'If index > 10 Then ' searchForThis = index & "0;" 'End If 'If index < 10 Then ' searchForThis = index & "00;" 'End If Dim tableresult As Boolean = searchWithinThis.Contains(searchForThis) If tableresult = True Then Dim range As String = line.Substring(0) ' If index < 10 Then table = table & line.Substring(2) 'line.StartsWith(";") 'line.Substring(0, 41) '& Chr(3) 'End If ' If range > 10 Then ' table = table & line.StartsWith(";") 'line.Substring(1, 41) '& Chr(3) 'End If End If Next x sr.Close() return table
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
Join the community of 500,000 technology professionals and ask your questions.