ayuda con un dropdwnlist en un datagrid

[luz elena]

como puedo actualizar mi base de datos con un dropdownlist dentro de un datagrid, como puedo referenciarme al item seleccionado de ese objeto (dropdownlist). Esto es lo q tengo y me marca error
ME URGE PORFAS!!!


Private Sub DataGrid1_UpdateCommand(ByVal source As Object, ByVal e As System.Web.UI.WebControls.DataGridCommandEventArgs ) Handles DataGrid1.UpdateCommand
Dim key As String = DataGrid1.DataKeys(e.Item.ItemIndex).ToString
Dim var1, var2 As String
Dim txt2 As TextBox
Dim txt1 As DropDownList
txt1 = CType(e.Item.Cells(1).Controls(), DropDownList)
var1 = txt1.SelectedItem.Text.ToString txt2 = CType(e.Item.Cells(2).Controls(0), TextBox)
var2 = txt2.Text
Dim r As Dataset1.DISCREPANCIARow
r = Dataset11.DISCREPANCIA.FindByCONSEC(key)
'r.TIPO_COMPRAS = var1
r.OBSERV_COMPRAS = var2
r.RESUELTA = "S"
r.FECHA_COMPRAS = Txtfecha.Text
r.TIPO_COMPRAS = var1 'list2.SelectedItem.Text
SqlDataAdapter1.Update(Dataset11)
DataGrid1.DataBind()