Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!
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
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
Join the community of 500,000 technology professionals and ask your questions.