我正在为我的客户设计一个项目。我编写了代码,使用vb.net从SQL搜索项目。
现在我的代码可以正常工作了。当我使用itemid搜索数据时,它会在所有相关文本框中显示数据,但不会在datagrid中显示。这是我的代码:
Dim connection As New SqlConnection("Server= DESKTOP-QN6F623; Database = dbo_main; Integrated Security = true")
Dim command As New SqlCommand("select * from items where itemnumber=@itemnumber", connection)
command.Parameters.Add("@itemnumber", SqlDbType.Int).Value = ItemnumberTextBox.Text
Dim adapter As New SqlDataAdapter(command)
Dim table As New DataTable()
adapter.Fill(table)
ItemnameTextBox.Text = ""
If table.Rows.Count() > 0 Then
' return only 1 row
ItemnameTextBox.Text = table.Rows(0)(1).ToString()
ItembarcodeTextBox.Text = table.Rows(0)(2).ToString()
ItemnameTextBox.Text = table.Rows(0)(3).ToString()
ItemdescriptionTextBox.Text = table.Rows(0)(4).ToString()
ItemcolorTextBox.Text = table.Rows(0)(5).ToString()
ItemsizeTextBox.Text = table.Rows(0)(6).ToString()
ItemmaterialComboBox.Text = table.Rows(0)(7).ToString()
ItemavailablestockTextBox.Text = table.Rows(0)(8).ToString()
ItempricesTextBox.Text = table.Rows(0)(9).ToString()
ItemsuppliersTextBox.Text = table.Rows(0)(10).ToString()
ItembrandnameComboBox.Text = table.Rows(0)(12).ToString()
ItemlocationComboBox.Text = table.Rows(0)(13).ToString()
Else
MessageBox.Show("NO Data Found")
End If
我只想在文本框中以及高亮显示的数据网格中显示搜索到的数据。