передавать данные в несколько текстовых полей с помощью 1 формы vb.net - PullRequest
0 голосов
/ 10 июля 2020

У меня проблема с передачей данных в VB. NET, и я новичок в vb. net + mysql. Не знаю, возможно это или нет. У меня есть несколько текстовых полей, и я хочу заполнить их идентификатором пользователя или чем-то еще. Я хочу сделать это как модальное окно php.

Когда я нажимаю TextBox, появляется 1 форма с ComboBox и кнопка отправки для передачи данных в TextBox в предыдущей форме. Я сделал это с одним TextBox, но я не могу передать его другому TextBox. Вот мой код:

Form1.vb

Private Sub TextBox4_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox4.Click
    'This is method **in my logic** can throw back data to TextBox4 from Form2.vb'
    Form2.Label1.Text = TextBox4.Name
    Form2.Show()
End Sub

Form2.vb

Private Sub AddTeam_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    Call getUSers()
End Sub
Sub getUSers()
    Call connection()
    Dim str As String
    str = "SELECT id FROM users WHERE status='Active'"
    cmd = New MySqlCommand(str, conn)
    rd = cmd.ExecuteReader
    If rd.HasRows Then
        Do While rd.Read
            ComboBox1.Items.Add(rd("id"))
        Loop
    Else

    End If
    ComboBox1.AutoCompleteMode = AutoCompleteMode.SuggestAppend
    ComboBox1.AutoCompleteSource = AutoCompleteSource.ListItems
End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    Dim nik = ComboBox1.SelectedItem
    'Here is the issue, if i pass to 1 TextBox (like TextBox4 as sample) it`s easy, but if pass to another TextBox i have no idea to do that'
    Form1.TextBox4.Text = nik
    Me.Refresh()
    Me.Close()
End Sub

примечание: я знаю, что есть много способов сделать это, например, изменить TextBox на ComboBox и заполнить данными, но мне нужен этот метод

Прошу прощения за мой бедный лог c в vb. net. Раньше у меня было лучше с PHP.

...