VB.Net Public 属性 Return 空白值
VB.Net Public Property Return Blank Value
我是编程新手,如果应用程序不告诉我错误在哪里,我无法识别某些 bugs/error。所以情况是我代码 Public 属性 目的是将 FormLogin TextBox 中的文本(ID)显示到另一种形式(FormInputTimeSheet)的标签中,以通过参考从 SQL 服务器检索一些数据ID(我使用单词 NIK 作为 ID)。
在 FromLogin
Dim FIT As New FormInputTimeSheet
FIT.NIKLookup2 = FlTbNIK.Text
Me.Hide()
FormInputTimeSheet.Show()
MessageBox.Show("Login Success! Selamat Datang " & table.Rows(0)(1).ToString())
FlTbNIK 是我用来输入登录 ID 的文本框
在 FormInputTimeSheet 中
Public Property NIKLookup2 As String
Private Sub FormInputTimeSheet_Load(sender As Object, e As EventArgs) Handles MyBase.Load
FiLbNIK.Text = NIKLookup2
End Sub
FiLbNIK为目标Label,结果在Label FiLbNIK上为Blank
但在同一个项目中,我使用相同的程序但它有效,它成功地将 ID 从 FormLogin 中的 TextBox 显示到 FormEditPassword 中的 Label,这是代码
在表单中登录
Dim FEP As New FormEditPassword
FEP.NIKLookup1 = FlTbNIK.Text
FEP.NameLookup = FlLbName.Text
Me.Hide()
FEP.Show()
在表单中编辑密码
Public Property NIKLookup1 As String
Public Property NameLookup As String
Private Sub FormEditPassword_Load(sender As Object, e As EventArgs) Handles MyBase.Load
FeLbEpHlp.Visible = False
FeLbNIK.Text = NIKLookup1
FeLbName.Text = NameLookup
End Sub
这些代码有效并显示了 ID 和名称。
任何解决方案都会得到应用。
先谢谢了
正如史蒂夫从评论中回答的那样,错误已通过更改解决
Dim FIT As New FormInputTimeSheet
FIT.NIKLookup2 = FlTbNIK.Text
Me.Hide()
***FormInputTimeSheet.Show()***
MessageBox.Show("Login Success! Selamat Datang " & table.Rows(0)(1).ToString())
至
Dim FIT As New FormInputTimeSheet
FIT.NIKLookup2 = FlTbNIK.Text
Me.Hide()
***FIT.Show()***
MessageBox.Show("Login Success! Selamat Datang " & table.Rows(0)(1).ToString())
谢谢史蒂夫!
我是编程新手,如果应用程序不告诉我错误在哪里,我无法识别某些 bugs/error。所以情况是我代码 Public 属性 目的是将 FormLogin TextBox 中的文本(ID)显示到另一种形式(FormInputTimeSheet)的标签中,以通过参考从 SQL 服务器检索一些数据ID(我使用单词 NIK 作为 ID)。
在 FromLogin
Dim FIT As New FormInputTimeSheet
FIT.NIKLookup2 = FlTbNIK.Text
Me.Hide()
FormInputTimeSheet.Show()
MessageBox.Show("Login Success! Selamat Datang " & table.Rows(0)(1).ToString())
FlTbNIK 是我用来输入登录 ID 的文本框
在 FormInputTimeSheet 中
Public Property NIKLookup2 As String
Private Sub FormInputTimeSheet_Load(sender As Object, e As EventArgs) Handles MyBase.Load
FiLbNIK.Text = NIKLookup2
End Sub
FiLbNIK为目标Label,结果在Label FiLbNIK上为Blank
但在同一个项目中,我使用相同的程序但它有效,它成功地将 ID 从 FormLogin 中的 TextBox 显示到 FormEditPassword 中的 Label,这是代码
在表单中登录
Dim FEP As New FormEditPassword
FEP.NIKLookup1 = FlTbNIK.Text
FEP.NameLookup = FlLbName.Text
Me.Hide()
FEP.Show()
在表单中编辑密码
Public Property NIKLookup1 As String
Public Property NameLookup As String
Private Sub FormEditPassword_Load(sender As Object, e As EventArgs) Handles MyBase.Load
FeLbEpHlp.Visible = False
FeLbNIK.Text = NIKLookup1
FeLbName.Text = NameLookup
End Sub
这些代码有效并显示了 ID 和名称。
任何解决方案都会得到应用。 先谢谢了
正如史蒂夫从评论中回答的那样,错误已通过更改解决
Dim FIT As New FormInputTimeSheet
FIT.NIKLookup2 = FlTbNIK.Text
Me.Hide()
***FormInputTimeSheet.Show()***
MessageBox.Show("Login Success! Selamat Datang " & table.Rows(0)(1).ToString())
至
Dim FIT As New FormInputTimeSheet
FIT.NIKLookup2 = FlTbNIK.Text
Me.Hide()
***FIT.Show()***
MessageBox.Show("Login Success! Selamat Datang " & table.Rows(0)(1).ToString())
谢谢史蒂夫!