关闭表单visual basic时停止标签重置

时间:2014-02-08 09:19:10

标签: vb.net

在visual basic中,每次单击一个按钮时,我都会设置一个标签。但是,当我关闭并重新打开表单时,标签会恢复为默认值。有没有办法让这个标签与关闭表单之前保持一致?感谢

1 个答案:

答案 0 :(得分:0)

当您关闭表单实例时,表单保留的每个本地对象都会被处置(销毁)。再次显示表单时,将创建表单类的新实例,但对象全部初始化为其默认值。所以你已经失去了现在的价值。

可能的解决方法是在表单类中包含一个共享变量来保持计数 共享变量不会被类实例破坏,但可用于具有当前值

的每个类的实例

您可以使用此值在表单构造函数中使用点击的当前值

初始化标签
Public Class Form1
   Private Shared clickCount As Integer

    Public Sub New()
        InitializeComponent()
        myLabel.Text = Convert.ToString(clickCount)
    End Sub

    ' you could also use Form1_Load event if you prefer
    ' Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
    '    Label1.Text = Convert.ToString(clicksCount)
    ' End Sub


    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        clicksCount += 1
        myLabel.Text = Convert.ToString(clicksCount)
    End Sub
End Class

请记住,此方法对您创建的每个Form1实例使用相同的变量(clickCount)。