【发布时间】:2014-12-11 03:05:18
【问题描述】:
我有一个程序,我必须在组合框中选择一个值并自动将其对应的值显示到文本框。
程序是这样的: 我将在 combobox = 'skucbo' 中选择一个产品 ID,然后产品描述将自动显示在 textbox = 'descriptiontxt' 中。
这是我的代码:
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
希望得到您的回应。谢谢!
【问题讨论】:
-
那么这里的问题是什么?
-
我认为您希望您的代码出现在“comboBox_changed”事件中。当组合更改时,您会更改文本。此外,您应该加载描述,而不是每次组合更改时都访问数据库(假设您的列表相对较小)。