Problema com adapter

pessoal...quando tento fazer isto:

Dim dsLista As DataSet

sql = "SELECT Valor, ValorMinimo FROM ListaPreco WHERE CodProduto='" & _

dsSaidaProduto.Tables(0).Rows(i).Item("CodProduto") & _

"' AND CodCondicaoPgto='" & cboCondPgto.SelectedValue & "'"

adaptador = New SqlCeDataAdapter(sql, vs.Conn)

adaptador.Fill(dsLista, "tabela") 'linha que dá erro!!!!!!!!!!!!

está dando o seguinte erro: At least one input table is required. [,,,,,]o que é e qual a solução?

rs...