Combo1的下拉列表中添加的多个项目如何在软件重启后照样显示？

来源：百度知道 编辑：UC知道 时间：2024/05/30 02:07:30
加在Combo1的下拉列表中的项目每次重启软件后就消失了。用什么代码才能让它长期保存？具体一些好吗？最好有代码

Private Sub Form_Load()
Open App.Path & "\temp.txt" For Input As #1
Dim str As String
str = ""
Do While Not EOF(1)
Line Input #1, str '按行读取
Combo1.AddItem str
Loop
Close #1
End Sub
修改了一下,完全可以了,你要确保temp.txt中有分行的文字.