美国留学

问题:数据库有2个表，两个表之间有2个字段相同,表1(HS编码,料件名称),表2(税则号,料件名称)，窗体有2个DataGridView,点击DataGridView1的记录, DataGridView2显示相同字段的相关记录，实现的代码如下：

Private Sub DataGridView1_CellClick(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles DataGridView1.CellClick

If e.RowIndex < 0 Then Return

Dim row As DataGridViewRow = DataGridView1.Rows(e.RowIndex)

Dim value1 As Object = row.Cells("HS编码").Value

Dim value2 As Object = row.Cells("料件名称").Value

Dim query As String = "SELECT * FROM 手册料件清单 WHERE 税则号=@HS编码 AND 料件名称 = @料件名称"

Using conn As New SqlConnection(DBconnString)

Using cmd As New SqlCommand(query, conn)

cmd.Parameters.AddWithValue("@HS编码", If(value1, DBNull.Value))

cmd.Parameters.AddWithValue("@料件名称", If(value2, DBNull.Value))

Dim adapter As New SqlDataAdapter(cmd)

Dim dt As New DataTable()

adapter.Fill(dt)

DataGridView2.DataSource = dt

End Using

End Using

End Sub

版权声明：本文转载于今日头条，版权归作者所有，如果侵权，请联系本站编辑删除