首页 > 解决方案 > VB.NET 类不更新我的变量

问题描述

我有两节课。

1-) NumberClass 2-) MessageClass

数字类;

Public Class NumberClass

Property Number As Byte
End Class

消息类;

Public Class MessageManager
Inherits NumberClass

Public Sub sendMessage()
    MsgBox(Number)
End Sub
End Class
Public Class Form1

这是我的按钮代码:

Private Sub ShowNumberBtn_Click(sender As Object, e As EventArgs) Handles ShowNumberBtn.Click
    Dim messageManager As New MessageManager
    messageManager.sendMessage()
End Sub

Private Sub ChangeNumberBtn_Click(sender As Object, e As EventArgs) Handles ChangeNumberBtn.Click
    Dim numberClass As New NumberClass
    numberClass.Number = 50
    MsgBox("Number Changed to : " & numberClass.Number)
End Sub

首先我点击更改号码按钮。它将 Number 变量的值更改为 50。直到这里一切正常,但是当我单击发送消息按钮消息显示 Number 变量的旧值时,它不会反映在 sendMessage 方法中。

标签: vb.netclassbasic

解决方案


对我来说效果很好...不确定您尝试了什么,因为您从未更新代码以显示您的尝试:

Public Class Form1

    Private messageManager As New MessageManager

    Private Sub ShowNumberBtn_Click(sender As Object, e As EventArgs) Handles ShowNumberBtn.Click
        messageManager.sendMessage()
    End Sub

    Private Sub ChangeNumberBtn_Click(sender As Object, e As EventArgs) Handles ChangeNumberBtn.Click
        messageManager.Number = 50
        MsgBox("Number Changed to : " & messageManager.Number)
    End Sub

End Class

Public Class NumberClass

    Property Number As Byte

End Class

Public Class MessageManager
    Inherits NumberClass

    Public Sub sendMessage()
        MessageBox.Show("Number = " & Number)
    End Sub

End Class

推荐阅读