How can I show a MessageBox when a database has certain text using SQLite?

[Modulus]

I have an application which reads all of the history off Google Chrome, using SQLite. This is the code I use to do so:

Dim google As String = (Environment.GetFolderPath(Environment.SpecialFolder.LocalApplicationData) + "\Google\Chrome\User Data\Default\History")
        Dim fileName As String = DateTime.Now.Ticks.ToString
        File.Copy(google, (Application.StartupPath + ("\" + fileName)))
        Dim con As SQLiteConnection = New SQLiteConnection(("DataSource = " + (Application.StartupPath + ("\" + (fileName + ";Versio=3;New=False;Compress=True;")))))
        Dim da As SQLiteDataAdapter = New SQLiteDataAdapter("select * from urls order by last_visit_time desc", con)
        Dim ds As DataSet = New DataSet
        da.Fill(ds)
        DataGridView1.DataSource = ds.Tables(0)
        con.Close()

If the database has any certain white listed text, then a MessageBox will show. How can I do this?