数值模拟 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 123 点赞 1 评论 186 浏览
