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

lstTitles.BackColor = Color.White

lstTitles.Items.Clear()

FillListboxWithTitles()

End Sub