数值模拟 Private Sub readButton_Click()FileNumber = FreeFileOpen "D:\test.txt" For Input As #FileNumberDo While Not EOF(FileNumber) Line Input #FileNumber, TextLine temp = temp + TextLine + vbC VB 2024-08-13 147 点赞 2 评论 222 浏览
