关于datagrid编辑的问题？

[supertigar]

datagrid显示出来数据，然后点上面的编辑，让这些数据显示在下面的一些文本框中。
问题出在怎么用这个参数@id，好像这样用不太对
部分代码如下：
Dim DBConn as sqlConnection
DBConn = New sqlConnection("Data Source=localhost;Initial Catalog=projects;Integrated Security=true")
Dim DBCommand As sqlDataAdapter
Dim DSPageData as New DataSet
Dim EditCmd As String = "Select 日志内容,进展时间,地点,完成情况,参加领导,备注,详细情况 from log where 日志ID = @Id "
DBCommand = New SqlDataAdapter(EditCmd,DBConn)
DBCommand.EditCmd.Parameters.Add(New SqlParameter("@Id", SqlDbType.int, 4))
DBCommand.EditCmd.Parameters("@Id").Value = dgwork.DataKeys(CInt(E.Item.ItemIndex))
DBCommand.Fill(DSPageData, _
"editlog")
txtcontent.text = DSPageData.Tables("editlog").rows(0).item("日志内容")
txtTime.Text =DSPageData.Tables("editlog").rows(0).item("进展时间")
txtSite.text=DSPageData.Tables("editlog").rows(0).item("地点")
txtFinish.text=DSPageData.Tables("editlog").rows(0).item("完成情况")
txtLeader.text=DSPageData.Tables("editlog").rows(0).item("参加领导")
txtDescription.text=DSPageData.Tables("editlog").rows(0).item("备注")
txtdetail.text=DSPageData.Tables("editlog").rows(0).item("详细情况")
End Sub

[supertigar]

请高手解答

[larrybest]

DBCommand.EditCmd.Parameters.Add(New SqlParameter("@Id", SqlDbType.int, 4))
DBCommand.EditCmd.Parameters("@Id").Value = dgwork.DataKeys(CInt(E.Item.ItemIndex))
用下面这句话代替：

DBCommand.EditCmd.Parameters.Add("@Id",dgwork.DataKeys(CInt(E.Item.ItemIndex))
)

[yuewenbin]

是不是没有在DataGrid控件里面没有甚至DataKeyField属性？

[supertigar]

'EditCmd' is not a member of 'System.Data.SqlClient.SqlDataAdapter'.
datakeyfield有了，我的用法和上面的应该相同，错误提示都是这样