Sign up to receive Decoded, a new monthly digest with product updates, feature release info, continuing education opportunities, and more.
Protected Sub btnSearch_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnSearch.Click Dim suppliers As List(Of Supplier) = Nothing Try If txtSearchTerm.Text <> "" Then pnlWaiting.Visible = True 'this is where the wheel should become visible suppliers = New List(Of Supplier) suppliers = HelperGeneral.GetSuppliers(txtSearchTerm.Text) If suppliers.Count > 0 Then rptSuppliers.DataSource = suppliers rptSuppliers.DataBind() lblResultCount.Text = "Found " & suppliers.Count & " Suppliers matching the search criteria." pnlSupplierDisplay.Visible = True Else lblResultCount.Text = "No Suppliers matching the search criteria." End If pnlWaiting.Visible = False 'and then where it is hidden again. End If Catch ex As Exception Throw End Try End Sub
Join the community of 500,000 technology professionals and ask your questions.