求助,如何用VB删除某一行记录
用VB将一些记录写进文本文件后,如果想将其中的某一行记录(如最后一行)删除,如何用VB程序实现?谢谢!
Type Record ' 定义用户自定义数据类型。
ID As Integer
Name As String * 20
End Type
Dim MyRecord As Record, RecordNumber ' 声明变量。
' 以随机访问方式打开文件。
Open "TESTFILE" For Random As #1 Len = Len(MyRecord)
For RecordNumber = 1 To 5 ' 循环五次。
MyRecord.ID = RecordNumber ' 定义 ID。
MyRecord.Name = "My Name" & RecordNumber ' 建立字符串。
Put #1, RecordNumber, MyRecord ' 将记录写入文件中。
Next RecordNumber
Close #1 ' 关闭文件。