テキストボックスをもう一度クリアする有効な方法

Question

もう一度検索すると、それをクリアするボタンはありませんか？コードは検索ボタンに表示されます。私はvb.netに精通していません。私はちょうどそれをクリアするためのボタンを持たずにリストビューで再びクリアする方法を知っています..事前に感謝！

Private Sub btnsearch_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnsearch.Click 
    If txtsearch.Text = "" Then 
     MsgBox("Pls enter valid values", MsgBoxStyle.Critical) 
    Else 
     searchrecord("SELECT * FROM Clothes where Size like '%" & txtsearch.Text & "%' order by Size") 
    End If 
End Sub 

Answer 1

Private Sub btnsearch_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnsearch.Click 
       If txtsearch.Text = "" Then 
        MsgBox("Pls enter valid values", MsgBoxStyle.Critical) 
       Else 
        ListViewName.Items.Clear() 'just clear the list view before the query again 
        searchrecord("SELECT * FROM Clothes where Size like '%" & txtsearch.Text & "%' order by Size") 

       End If 
End Sub 

Answer 2

Private Sub btnsearch_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnsearch.Click 
    If txtsearch.Text = "" Then 
     MsgBox("Pls enter valid values", MsgBoxStyle.Critical) 
    Else 
     searchrecord("SELECT * FROM Clothes where Size like '%" & txtsearch.Text & "%' order by Size") 
     txtsearch.Text = "" '<-- adding this 
    End If 
End Sub