Vb.net 从组合框中选择值并在文本框中显示相应的值
我有一个程序,在其中,我必须在组合框中选择一个值,并自动将其对应的值显示到文本框中 程序如下所示: 我将在combobox='skucbo'中选择一个产品ID,然后产品描述将自动显示在textbox='DescriptionText'中 这是我的代码:Vb.net 从组合框中选择值并在文本框中显示相应的值,vb.net,combobox,textbox,Vb.net,Combobox,Textbox,我有一个程序,在其中,我必须在组合框中选择一个值,并自动将其对应的值显示到文本框中 程序如下所示: 我将在combobox='skucbo'中选择一个产品ID,然后产品描述将自动显示在textbox='DescriptionText'中 这是我的代码: Private Sub descriptiontxt_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles descriptiontxt.T
Private Sub descriptiontxt_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles descriptiontxt.TextChanged
Dim sku As String = skucbo.SelectedValue.ToString
Dim dr As SqlDataReader
connect()
cmd = New SqlCommand
cmd.CommandType = CommandType.Text
cmd.Connection = con
con.Open()
cmd.CommandText = "SELECT description FROM tbl_sku WHERE skucbo = @sku"
dr = cmd.ExecuteReader
con.Close()
End Sub
期待你的回应。谢谢 您还需要为组合框更改SelectedIndex。
在SelectedIndexChanged中,将文本框设置为combobox所选项目。
“descriptionText.Text=skucbo.SelectedItem”
那么这里的问题是什么呢?我想你希望你的代码在“comboBox\u changed”事件中。当组合更改时,您可以更改文本。此外,您应该加载描述,而不是每次组合更改时都点击数据库(假设您的列表相对较小)。
Private Sub skucbo_SelectedIndexChanged(sender As Object, e As EventArgs) Handles skucbo.SelectedIndexChanged
descriptiontxt.Text = skucbo.SelectedItem
End Sub