1、按行读取要有判断语句判断是否读取完 了,如下:
Dim FileNumber1 Str As String
FileNumber1 = FreeFile
Open "D:\123.txt" For Input As #FileNumber1
While Not EOF(FileNumber1)
Line Input #FileNumber1, Str
Wend
Close #FileNumber1
2、On Error Resume Next 不要随便用,尤其在调试阶段。否则容易掩盖一些致命的错误。
3、Form1.Scores 这个是什么东西?
温馨提示:答案为网友推荐,仅供参考