1.
Dim
pins
As
New
List(Of
String
)(
New
String
() {cbbe1.Text})
2.
3.
If
pins.Contains(cbbe1.Text)
Then
4.
sql =
"select * from PartList where Customer='"
& cbbe1.Text &
"'"
5.
da =
New
SqlDataAdapter(sql, cn)
6.
da.Fill(ds,
"PartList"
)
7.
dgv1.DataSource = ds.Tables(
"PartList"
)
8.
End
If