FileOpen(1, filename1, OpenMode.Output)
For index = 0 To 0
PrintLine(1, students_name, correct)
Next
FileClose(1)
End Sub
^^这是我现在使用的代码,但每次写入文件时,它都会删除之前的数据 - 我需要将其写入文件中的下一行。
提前致谢
答案 0 :(得分:1)
使用OpenMode.Append。 OpenMode.Output删除文件内容。
答案 1 :(得分:1)
用以下代码替换您的代码:
IO.File.AppendAllText(filename1, students_name & vbTab & correct)
请注意这突然间更具可读性,事实上每个角色现在都有意义。通常,在转换遗留代码时,它应该看起来更简洁,易于阅读和理解。
我的VB6知识生疏,所以我had to peek at documentation了解PrintLine
有3个参数的含义:
PrintLine(1," Hello"," World")'用标签分隔字符串。