L
luis
I need to extract strings from a binary file with the following format
INT-STRING-INT_STRING-INT-STRING-..........
where the integer is the length of the string.
I want to make a function that does what this failed attempt yearns...
Public Function svString(ByVal FileNo As Integer, Cursor As Integer) As
String
Dim sze As Integer
sze = 10
Get #FileNo, Cursor, sze ' Get string len
Dim svString As String * sze
Get #FileNo, Cursor + 4, svString ' Get string
End Function
The problem is declaring an array whith a variable (has to be constant)
can anybody provide tips ?
INT-STRING-INT_STRING-INT-STRING-..........
where the integer is the length of the string.
I want to make a function that does what this failed attempt yearns...
Public Function svString(ByVal FileNo As Integer, Cursor As Integer) As
String
Dim sze As Integer
sze = 10
Get #FileNo, Cursor, sze ' Get string len
Dim svString As String * sze
Get #FileNo, Cursor + 4, svString ' Get string
End Function
The problem is declaring an array whith a variable (has to be constant)
can anybody provide tips ?