Atribuindo Parametros a um DataSource Programaticamente

Utilizo a rotina abaixo para atribuir parâmetros a um DataSorce (ex: AccessDataSource) programaticamente. Neste exemplo estou passando o texto localizado na célula e.Row.Cells(0).Text do GridView.

Protected Sub GridView2_RowDataBound(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.GridViewRowEventArgs) Handles GridView2.RowDataBound
If e.Row.RowType = DataControlRowType.DataRow Then

Dim s As SqlDataSource = CType(e.Row.FindControl("DS_Produtos"), SqlDataSource)
s.SelectParameters(0).DefaultValue = e.Row.Cells(0).Text


End If
End Sub