vb.net - 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 方法中。
解决方案
对我来说效果很好...不确定您尝试了什么,因为您从未更新代码以显示您的尝试:
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
推荐阅读
- dynamics-crm - 访问 Microsoft Dynamics 365 - API
- node.js - 在保存用户数据之前我无法更改用户的角色 ID 我想将他的角色 ID 更改为 2 并保存
- angular5 - tomcat中的Angular 5部署问题
- django-forms - 按标签按钮删除不起作用
- sql - 带有 Select 子句的 RPGLE 动态 SQL 不起作用
- python - 如何根据其他两列有条件地制作新的 pandas DF 列
- r - R(和 python)从 5 或 6 开始向上取整
- php - 自定义管理员配色方案(WordPress)
- bash - 如何从流中读取最后一个不以换行符结尾的字符
- c# - 将字符串添加到 Model.Variable Name while 循环的末尾