关于VB中ListView控件的问题

来源：百度知道 编辑：UC知道 时间：2024/06/09 04:16:39
编了一个小程序，是将学号、姓名、成绩输入ListView中显示的。但是关闭程序再打开以前输入的数据就没有了。我想设置一个“保存”按键，通过这个按键能保存文件，这样在关闭程序后再次打开能显示上次输入的数据。我是初学者，请高手指点，最好能有代码附上。谢谢啦~~~
谢谢universe171402,还想问一下，如果我想实现这样的功能应该怎样编：
一次输入“学号”（假设是1）和“姓名”（假设是张三）后按下“添加姓名”按键，然后又输入“学号”（还是1号）和“成绩”后按下“添加成绩”按键，这两次输入的信息在ListView中都显示在同一个学号（即1号）的信息中，而不是出现两个1号。
麻烦你了，真的很急，谢谢~~~

如果还有什么问题，如果时间很急的话，可以加 QQ 570403438 !我几乎每天都会在
-----------------------------------------
For i = 1 To ListView1.ListItems.Count
If ListView1.ListItems(i) = Text1.Text Then '如果 Listview1 的某一条记录的第一列和输入的学号相同
ListView1.ListItems(i).SubItems(2) = Text2.Text 'Text2 输入成绩
Exit For
End If
Next i
---------------------------------------
在添加记录完成后，加一段代码:
ListView1.Sorted = False
ListView1.SortKey = 0 '根据第一列排列，也就是学号
ListView1.SortOrder = lvwAscending '升序排列 如果用 lvwDescending 就是降序排列
ListView1.Sorted = True '允许ListView 排列
--------------------------------------

Private Sub Command1_Click() 'ListView1 的所有记录输出到文件
Open "c:\tem.txt" For Output As #1 '打开文件用来输出,输出到 C:\tem 的文本文件下
For i = 1 To ListView1.ListItems.Count '循环，读取 ListView1 的每一条记录
Print #1, ListView1.ListItems(i).Text & "|" & ListView1.ListItems(i).SubItems(1) & "|&