If I read the question right, it's fairly simple.
The code below should be combined.
vb.net Code:
Dim iRetrieveLine As Integer = 0 'Line 0
Dim iTempInteger As Integer = 0
Dim sLine As String = ""
Using sr As New StreamReader("PathToFile")
Do Until 0 > 1 'Yea I know, never ending...
If iTempInteger-1 = iRetrieveLine The
sLine = sr.ReadLine()
iTempInteger += 1
Exit Do
Else
sr.ReadLine()
End If
Loop
End Using
So now the text you want is in sLine,
Now we format that text,
So if the bar codes are stored as this:
9401151 Box1 Description is here
vb.net Code:
Dim sSub As String = ""
Dim sBarcode As String = ""
iTempInteger = 0
Do Until sSub = " "
sSub = sLine.Substring(iTempInteger, 1)
sBarcode &= sSub
iTempInteger += 1
Loop
now if you want the description too, do this:
vb.net Code:
sSub = " "
Dim s
iTempInteger = 0
Do Until sSub = ""
sSub = sLine.Substring(iTempInteger, 1)
sBarcode &= sSub
iTempInteger += 1
Loop
That might work, but im not sure, I haven't tested it.
Cheers