首页 > 解决方案 > 随机文件将记录添加到文本文件,但它们不是显示在不同的行上,而是写在同一行上

问题描述

这就是我打开文件的方式:

FileOpen(1, TxtChosenFile.Text, OpenMode.Random, , , Len(ObjItem))

那是结构:

Private ObjItem As New item
Private NewObjItem As New item

Structure item
    Dim id As Integer
    <VBFixedString(30)> Dim description As String
    Dim type As String
    Dim quantity As Integer
    Dim UnitPrice As Integer
End Structure

这就是按钮输入代码:

ObjItem.description = TxtDescription.Text
ObjItem.id = TxtItemNumber.Text
ObjItem.quantity = TxtQantity.Text
ObjItem.type = CmbType.Text
ObjItem.UnitPrice = TxtUnitPrice.Text

temp = ObjItem.id 
       & "," & 
       ObjItem.description
       & "," & 
       ObjItem.type
       & "," &
       ObjItem.quantity
       & "," & 
       ObjItem.UnitPrice

FilePutObject(1, temp, RecordNumber:=TxtItemNumber.Text

标签: vb.net

解决方案


推荐阅读