怎么样可以获得当前datagrid中某行的值？

Question

on error resume next
msgbox rs.fields("name").value

Answer 1

在datagrdi1的rowcolchange事件中添加代码
datagrid1.col = 0 '0 当前为Name字段在datagrid1中的列值
msgbox datagrid1.text

Answer 2

在datagrid1的MouseDown事件中得到点击的行
Private ColValue, RowValue
Private Sub datagrid1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
      On Error Resume Next
      RowValue = datagrid1.RowContaining(Y)   '所选行和列
      ColValue = datagrid1.ColContaining(X)   
      for i=0 to  datagrid1.Columns.Count
        if trim(datagrid1.Columns(i).DataField)="name" then
            datagrid1.Col=i
            datagrid1.Row=RowValue 
            msgbox datagrid1.text
        end if
     
      next
end sub你自己调试一下再修改一下后使用

Answer 3

IsMe 的方法也行
你的问题可以从两种思路来解决
一是用记录集,即IsMe 的方法,一是用通过选定满足要求的datagrid单元格,该单元格的值就是你要的值