100分求助文件读取的代码？

Question

本人想读取同花顺股票软件数据导出的文件（如股本结构），但又不懂如何用VB读取，有哪位高手肯教一下我这菜鸟吗？
文件导出名如：20120504-20140504#股本结构.财经

Answer 1

Dim lFreeNum As Long,sCode As String
    lFreeNum = FreeFile
    Open 文件 For Input As #lFreeNum
    
    While Not EOF(lFreeNum) 
        Line Input #lFreeNum, sCode
    Wend
    Close #lFreeNum