VB如何通过的三个下拉菜单把三个文本文件中的数据分别读取出来然后对其指定的数据行进行更新

来源：百度知道 编辑：UC知道 时间：2024/07/02 02:35:02
各位大虾好，小弟最近在用VB做一个通过ListView读取多个文本文件的程序（文本文件中的数据是通过程序界面中的Text文本框来录入的）。在编辑完菜单栏下的三个下拉菜单后，要想通过逐一单击这三个下拉菜单把三个文本文件中的数据分别读取到ListView中，然后单击ListView中的某一行数据后在界面中相应的文本框中显示出来，并且对文本框中的数据修改后保存到文本文件中。我是位VB初学者，对编程不太了解，希望能得到你们的得力帮助！

Open App.Path & "你要的文本名.txt" For Append As #1
Print #1, text1.text '完成你的text的录入文本功能 Close #1
If Len(Dir(App.Path + "\你要的文本名.txt")) > 0 Then
Open App.Path + "\你要的文本名.txt" For Input As #1
i = 0
Do Until EOF(1)
i = i + 1
Line Input #1, newline
If i > 10 Then
Exit Do
End If
dlt = Trim(dlt) + Trim(newline)
' newline就是你从文本框中读到的数据.
再把newline只的值付给别listview 可以
dim itemx as item
Set itemx = ListView1.ListItems.add(Text:= )
itemx.ListSubItems方法得到
依上面的方法细想一下就可以做出来的!

VB也是多少年前学的了,有点忘了,好像应该要用到文件那部分的知识,你可以上CSDN上看看,那里面有很多的!