Question

VS2010的VB里的listbox怎么自动保存数据，下次打开软件是上次打开软件的数据

自动保存listbox里的内容,下次打开本程序里内容不变

Answer 1

VS2010的VB里的listbox怎么自动保存数据，下次打开软件是上次打开软件的数据,可以使用 数据库来保存数据。当然，如果数据量少，用ini文件也是可以的。甚至用 注册表也可以。

在打开软件时候，需要自动加载即可。

Answer 2

    Private Sub Form1_Disposed(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Disposed
        Dim sw As System.IO.StreamWriter
        sw = New System.IO.StreamWriter("c:\1.txt", False)
        For i = 0 To ListBox1.Items.Count - 1
            sw.WriteLine(ListBox1.Items(i))
        Next
        sw.Close()
    End Sub

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        If System.IO.File.Exists("c:\1.txt") Then
            Dim sr As System.IO.StreamReader
            Dim n As Integer = 0
            sr = New System.IO.StreamReader("c:\1.txt", True)
            Do
                Dim line$ = sr.ReadLine()
                ListBox1.Items.Add(line)
                n = n + 1
            Loop Until sr.EndOfStream = True
            sr.Close()
        End If
    End Sub

追问

关闭之后打开listbox没有东西

追答

我测试过是可以的，你把代码完全复制过去

追问

全复制了，现在提示这个有问题

追答

奇怪了，没发现有什么问题，你能把整个工程打个包发到278700294的qq邮箱吗？

追问

已经发了，1752321720，我油箱帐号

追答

已回复

追问

加个扣，你远程给我看看哪出问题，刚刚加了你那个油箱QQ

Answer 3

病情分析：
1,宫颈糜烂是慢性宫颈炎的一种表现，主要是感染引起的，可引起白带增多、接触性出血等，以物理治疗为主，药物治疗效果不佳。

指导意见：

建议行宫颈细胞刮片检查，若只是提示炎症，可行宫颈聚焦超声治疗，是目前治疗宫颈糜烂比较先进的技术，属物理治疗，不会影响日后生育。