Private Sub btnShowAllTitles_Click(sender As Object, e As EventArgs) Handles btnShowAllTitles.Click

lstTitles.BackColor = Color.White

lstTitles.Items.Clear()

txtSearch.Text = ""

Call Form1_Load(Me, e)

EEnd Sub