[Resolvido] Problema ao realizar busca de registro no banco de da

Olá, estou fazendo um trabalho em que preciso criar um programa para controle de estoque.

Quando busco os registros no banco de dados e exibo no DataGridView na primeira vez funciona, depois quando mando realizar uma nova busca, em vez de atualizar os campos do DataGridView ele adiciona os campos novamente, exibindo registros duplicados no DataGridView.

Estou usando banco de dados Firebird em localhost

Private Sub listaproduto()
conexao.ConnectionString = FbConexao
conexao.Open()

 da = New FbDataAdapter("Select * from TB_PRODUTO", conexao)

 Try
 da.Fill(ds, "TB_PRODUTO")
 DataGridView1.DataSource = ds.Tables("TB_PRODUTO")
 Catch ex As Exception

 End Try
 conexao.Close()
 End Sub

desde já obrigado