读取text.txt字符到数组出错原因

--------------------编程问答-------------------- On Error Resume Next
是掩盖程序错误的最好方法，别到处使用 --------------------编程问答-------------------- 判断下再处理下
c = Trim(Replace(c, VbTab, " "))
If c Like "* *" Then
    ... --------------------编程问答--------------------

补充：VB ,  基础类