Public Sub CopyFileToArray(zarray As Variant, filename As String, maxlines As Integer)
Dim LinesFromFile As String, NextLine As String
Open filename For Input As #1
For xi = 1 To maxlines
Line Input #1, NextLine
LinesFromFile = LinesFromFile + NextLine + Chr(13) + Chr(10)
zarray(xi) = NextLine
Next
Close #1
End Sub
It needs to be updated like this:
Before the array was like this- Array(1 to x) as string
Now it''s like this- Array(1 to x,1 to y, 1 to z, 1 to a) as string
I ''ve separated the information the program needs to get from text file with commas(,).
Example, again-
info1,info2,info3,info4
x y z a
The sub needs to read the text that is separated by commas and write it to the array''s corresponding indices. How to do that?
(Hope you got it, I''m not good to explain things as you can see )
Copying text to array
I use the following code to copy 1 line of text file to 1 index of array.
This topic is closed to new replies.
Advertisement
Popular Topics
Advertisement