从组合框中选择customerName时如何自动填充customerAdd文本框

问题描述:

这是我的代码:

here is my code:

Imports System.Data.SqlClient
Public Class Form3
    Dim cn As SqlConnection
    Dim cmd As SqlCommand
Dim dr As SqlDataReader
Dim da As SqlDataAdapter
Dim ds As New DataSet
Dim dt As New DataTable

Private Sub Form3_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
       cn = New SqlConnection("server=localhost;uid=sa;pwd=sa;database=RKPlastics")
       cn.Open()
       da = New SqlDataAdapter("select * from trial order by name ASC", cn)
       da.Fill(dt)
       ComboBox1.DataSource = dt
       ComboBox1.DisplayMember = "name";
       ComboBox1.ValueMember = "id";
       ComboBox1.Text = "select value";
ComboBox1.SelectedValue = 1
cn.Close()
   End Sub

在这种情况下: ComboBox.SelectedIndexChanged事件 [ ^ ]

像这样的东西:
In this event: ComboBox.SelectedIndexChanged Event[^]

Something like:
Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged

        Dim selectedEmployee = CType(ComboBox1.SelectedItem, String)
        TextBox1.Text = TextBox1.Text & Microsoft.VisualBasic.vbCrLf & selectedEmployee 

End Sub