恳请各位高手指教


Private Sub Command1_Click()
Label1.Caption = Text1.Text
End Sub

为何关闭程序后Label1.Caption 的值又变回默认值，而不是用户在Text1中输入的值？
咋整的？

非常感谢楼上2位同志的回答em01]
请问如何让程序保存用户输入的值呢？[

楼上的兄弟能不能说得详细一点？


还是没整明白。

谢谢各位，我用下面的方法办到了。

Private Sub Command1_Click()
Label2.Caption = Text1.Text
Dim fso, txtfile
Set fso = CreateObject("scripting.filesystemobject")
Set txtfile = fso.CreateTextFile("d:\dlsfxt\lj.txt", True)
txtfile.Write (Text1.Text)
txtfile.writeblanklines (3)
txtfile.Close
End Sub



Private Sub Form_Load()
Open "d:\dlsfxt\lj.txt" For Input As #1
Input #1, p$
Label2.Caption = p$
Close #1

但是有没有更好的办法呢？
比如直接写入label1的caption 属性值。