ได้แล้วครับ ผมใช้แบบนี้
Private Sub cbbe1_SelectedIndexChanged_1(sender As Object, e As EventArgs) Handles cbbe1.SelectedIndexChanged
Dim pins As New List(Of String)(New String() {cbbe1.Text})
If pins.Contains(cbbe1.Text) Then
sql = "select * from PartList where Customer='" & cbbe1.Text & "'"
da = New SqlDataAdapter(sql, cn)
da.Fill(ds, "PartList")
dgv1.DataSource = ds.Tables("PartList")
End If
Dim pins As New List(Of String)(New String() {cbbe1.Text})
'แบบนี้มันบอกอยู่แล้วว่ายังไงซะ pins จะต้องมี cbbe1.Text แถมมีแค่ cbbe1.Text ด้วย ไม่จำเป็นต้องใช้ if ข้างล่างเข้ามาเช็คเลย
If pins.Contains(cbbe1.Text) Then
sql = "select * from PartList where Customer='" & cbbe1.Text & "'"
da = New SqlDataAdapter(sql, cn)
da.Fill(ds, "PartList")
dgv1.DataSource = ds.Tables("PartList")
End If
Load balance : Server 02
