Hi All,
I am using the below code to add strings to a listbox from a file. The problem is I am unable to add the entire string as the string is truncated beyond 255 characters
I am using the below code to add strings to a listbox from a file. The problem is I am unable to add the entire string as the string is truncated beyond 255 characters
Code:
Open "D:\ccapplications\AddressFile\dat\PostOfficeFile\uspsforwardedaddressfiledupconsolidate.txt" For Input As #fh
Do While Not EOF(fh)
Line Input #fh, LineFromFile
NewLine = Mid$(LineFromFile, 44, 20) & Mid$(LineFromFile, 120, 60) & Mid$(LineFromFile, 347, 40) & LineFromFile
List2.AddItem NewLine
Loop