这是我代码中的一部分
 Dim key As String = DataGrid1.DataKeys(e.Item.ItemIndex).ToString()
        Dim tbox As TextBox
        Dim r As DSetLRZJHZ.LJunShiRZJHZRow
        r = DSetLRZJHZ1.LJunShiRZJHZ.FindByID(key)
        tbox = CType(e.Item.Cells(5).Controls(0), TextBox)
        r.ZhouCi = tbox.Text

解决方案 »

  1.   

    代码说明如下:
         e.item.itemindex:datagrid第几行的行的值
         tbox            :定义的一个textbox的实例
         r               :是dataset中的一个行的实例
         DSetLRZJHZ1.LJunShiRZJHZ.FindByID(key):在数据集dataset中以关键字查找相关记录
         tbox = CType(e.Item.Cells(5).Controls(0), TextBox):这就是你要的东西了
         r.ZhouCi = tbox.Text:把取得的值赋值给一个变量.