Я новичок в программировании, я не могу определить некоторые ошибки/ошибки, если приложение не сообщает мне, где ошибка. Таким образом, дело в том, что i Code Public Property предназначен для отображения текста (ID) из FormLogin TextBox в A Lable в другой форме (FormInputTimeSheet), чтобы получить некоторые данные из SQL Server, ссылаясь на 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 — это текстовое поле, которое я использую для ввода идентификатора для входа в систему.
In 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 — это целевая метка, а результат — пустой на метке FiLbNIK.
но в том же проекте я использую ту же процедуру, но она сработала, удалось показать идентификатор из TextBox в FormLogin для Label в FormEditPassword, вот код
В формеВойти
Dim FEP As New FormEditPassword
FEP.NIKLookup1 = FlTbNIK.Text
FEP.NameLookup = FlLbName.Text
Me.Hide()
FEP.Show()
В формеEditPassword
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
Эти коды сработали и показали идентификатор и имя.
Любое решение будет оценено. Спасибо перед.
omg, эта ошибка заняла у меня несколько часов просмотра, спасибо, Стив !!!
Рад видеть, что ваша проблема решена, вы можете нажать «✔», чтобы отметить свой ответ как принятый ответ, чтобы изменить его статус на «Отвечено». Это также поможет другим решить аналогичную проблему.
Как ответил Стив из комментария, ошибка была решена путем изменения
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())
Спасибо, Стив!
Измените FormInputTimeSheet.Show() на ПОДХОДИТ.Показать(). Вы отображаете экземпляр формы по умолчанию (то, чего, по моему мнению, вообще не должно существовать) вместо экземпляра FormInputTimeSheet, где вы установили NIK