Dim sql As String
If ds.Tables.Contains("I_Equipment") Then ds.Tables("I_Equipment").Clear()
sql = "Select ID_P,Name_P,Remain_P,Num_Check From I_Equipment "
Dim da As New SqlDataAdapter(sql, Conn)
da.Fill(ds, "I_Equipment")
dgvEmployee.DataSource = ds
dgvEmployee.DataMember = "I_Equipment"
If ds.Tables("I_Equipment").Rows.Count <= 0 Then
MessageBox.Show("ไม่พบรายการที่ค้นหา !!!", "ผลการทำงาน", MessageBoxButtons.OK, MessageBoxIcon.Information)
Else
End If