vb6中dbgrid选中行

Question

取得dbgrid选择所在行,使用row属性取不到,不知道怎么回事...请各位大侠指教,谢谢!

Answer 1

或者取得当前行所在列的值也可以,
第一次使用dbgrid,不太会用...

Answer 2

dbgrid中的值是recordset 纪录集的 显示 ，所选中的行 ado1.recordset.fields(0).value 就可以返回具体的列的值

Answer 3

Set DataGrid2.DataSource = Rs
DataGrid2.Row = 3
我测试过了,这样可以的呀,这时DataGrid2指向了第四行,(行号是从0开始的)

Answer 4

Set DataGrid2.DataSource = tblnameRs
    DataGrid2.Row = 3
    MsgBox DataGrid2.Row
这样是可行的呀,我试过了

Answer 5

一定要recordset才可找到相应的值吗?
可以从dbgrid的属性中得到吗?如果象mshflexgrid的text之类的 。

Answer 6

Set DataGrid2.DataSource = tblnameRs
    DataGrid2.Row = 3
    MsgBox DataGrid2.Row
这样是可行的呀,我试过了

Answer 7

一定要recordset才可找到相应的值吗?
可以从dbgrid的属性中得到吗?如果象mshflexgrid的text之类的 。

Answer 8

一定要recordset才可找到相应的值吗?
可以从dbgrid的属性中得到吗?如果象mshflexgrid的text之类的 。

Answer 9

set datagrid1.DataSource=rs
datagrid1.row=3
msgbox datagrid1.row'值是3

Answer 10

datagrid 本身的属性只能得到datagrid 表的目前行,而不是recordset的
如果你的 datagrid 一次只能显示10条记录,
你点 datagrid 的最后一行, datagrid.row 返回的值永远只会是10,
不管你的记录是在表中的第几条.
说不好说,你试下就知道怎么回事了.Private Sub DataGrid1_RowColChange(LastRow As Variant, ByVal LastCol As Integer)
Text1.Text = datagrid.Row
End Sub下面这个是用Recordset的Book属性得到值Private Sub DataGrid1_RowColChange(LastRow As Variant, ByVal LastCol As Integer)
Text1.Text = Adodc1.Recordset.Book
End Sub

Answer 11

注意.datagrid并不等于dbgrid.不同的控件啊...

Answer 12

是dbgrid而不是datagrid...
两个不同的控件呢.

Answer 13

Private Sub DBGrid1_RowColChange(LastRow As Variant, ByVal LastCol As Integer)
Text1.Text = Data1.Recordset.AbsolutePosition + 1
End Sub真是的...

Answer 14

这么老的贴 还有人挖坟啊。对于记录的行，最好的办法，是在设计数据库的时候，添加自动编号的字段Text1.Text = ado1.recordset.fields("自动编号的字段")还有，想得到所选择的记录的值 的话，Text1.Text = DBGrid1.Columns(0)
Text2.Text = DBGrid1.Columns(1)连接了数据库的,这样就行了Text1.Text = ado1.recordset.fields("字段")PS: 不要用DBGrid 那种旧东西了....多麻烦啊,问题又多
     用datagrid 比较好点， 可以的话，换其他的更棒....