删除datagrid但前行

Question

我的程序是
    cmd.CommandText = "delete from 设备 where " & rs1.Fields(0).Name & "  =" & DataGrid1.Columns.Item(0)
    cmd.Execute
    rs1.Requery
我得数据表首是text型的（如果变成double就可以），不知道哪里不对，提示错误是“至少一个参数没有被指定值”
模板里Public rs1 As ADODB.Recordset
      Set rs1 = New Recordset
       rs1.Open "select * from 设备", cnn, adOpenStatic, adLockOptimistic
十足菜鸟，困扰了我好几天，麻烦大家帮忙

Answer 1

cmd.CommandText = "delete from 设备 where " & rs1.Fields(0).Name & "  =" & DataGrid1.Columns.Item(0)
换成
cmd.CommandText = "delete from 设备 where " & rs1.Fields("Name") & "  =" & DataGrid1.Columns.Item(0)

Answer 2

cmd有
Public cmd As New ADODB.Command