Message box for empty DataGridView vb.net 2005

My DataGridView is populated when a search for customer records is done. If I can't find any customer records with a last name starting with "gra" then the DataGridView doesn't get populated with records. What I want to do is create a message if the DataGridView is Empty. What would the code be if the DataGridView is Empty?


Private Sub Search_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Search.Click
 
        'DATAGRID MULTIPLE RESULTS LIST
        Dim MySQLConnection As String = My.Settings.dbConnection
        Dim dbConnection As New SqlConnection
        dbConnection.ConnectionString = MySQLConnection
 
        Dim bsPatients As BindingSource
        bsPatients = New BindingSource
        dbConnection.Open()
 
        Dim noRecord As Integer
        noRecord = 0
 
        Dim strSQL As String = "SELECT FirstName, LastName, DOB, CustomerID FROM Customer WHERE LastName LIKE '" & LastName.Text & "%' ORDER BY FirstName"
 
        Dim myDA As SqlDataAdapter = New SqlDataAdapter(strSQL, dbConnection)
 
        Dim myPatient As DataTable = New DataTable
 
        myDA.Fill(myPatient)
 
 
        bsPatients.DataSource = myPatient
 
        DataGridView1.DataSource = bsPatients
 
        dbConnection.Close()
 
        dbConnection = Nothing
 
 
    End Sub

Open in new window

rfgrahamAsked:
Who is Participating?
I wear a lot of hats...

"The solutions and answers provided on Experts Exchange have been extremely helpful to me over the last few years. I wear a lot of hats - Developer, Database Administrator, Help Desk, etc., so I know a lot of things but not a lot about one thing. Experts Exchange gives me answers from people who do know a lot about one thing, in a easy to use platform." -Todd S.

JackOfPHCommented:
Put this code after the myDA.Fill code...

        If myPatient.Rows.Count = 0 Then
            MsgBox("No serach found")
        End If
0

Experts Exchange Solution brought to you by

Your issues matter to us.

Facing a tech roadblock? Get the help and guidance you need from experienced professionals who care. Ask your question anytime, anywhere, with no hassle.

Start your 7-day free trial
lakshmidurgaCommented:
Add a bit of logic when biding the data to datagrid

myDA.Fill(myPatient)
 
 if mypatient.rows.count > 0 then
        bsPatients.DataSource = myPatient
 
        DataGridView1.DataSource = bsPatients
else
If txtCardNumber.Text & "" Then
    
    Dim strScript As String = "<script language=javascript>"
    
    strScript += "alert('please enter Credit Card Number');"
    
    strScript += "</script>"
    
    If (Not ClientScript.IsStartupScriptRegistered("clientScript")) Then
        
        ClientScript.RegisterStartupScript(Me.[GetType](), "clientScript", strScript, False)
        
    End If
    
   DataGridView1.visible=false
    
    
End If
 
 
        dbConnection.Close()

Open in new window

0
lakshmidurgaCommented:
Hi,

Please ignore

 If txtCardNumber.Text & "" Then in the above code.Just use the javascript code to give a alert message.

0
It's more than this solution.Get answers and train to solve all your tech problems - anytime, anywhere.Try it for free Edge Out The Competitionfor your dream job with proven skills and certifications.Get started today Stand Outas the employee with proven skills.Start learning today for free Move Your Career Forwardwith certification training in the latest technologies.Start your trial today
Visual Basic.NET

From novice to tech pro — start learning today.

Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.