vb6.0中怎样使data所在记录是DataGrid光标所在行记录？

DataGrid控件在读取数据的时候，会发生读取数据不正确的情况，这是由于控件本身决定的，一般是用控件的DataGrid1_Click事件读取数据，为什么呢？经过昨天一天的探讨，知道了DataGrid控件的Row和Col值是不确定的，我读取过记录的Row和Col值，发现在控件拉动滚动条时，控件的Row和Col值的确是在发生变化的。
后来资料介绍，可以用控件的DataGrid1_RowColChange事件读取数据，但是这种读取数据的方法只能读取被点击的记录的字段值，而不能读取整个DataGrid控件显示的所有字段：
Private Sub DataGrid1_RowColChange(LastRow As Variant, ByVal LastCol As Integer)
Text1(0).Text = DataGrid1.Text
End Sub
在Text1(0).Text文本框显示的是你刚刚点击的记录字段值（注意只是一个字段的值），如果你认为用控件的Row和Col属性来读取，上面说过由于它的Row和Col值不确定，因此控件是不能支持这种读取方法。

那么有没有可以读取DataGrid控件的方法呢？有的：
方法1：用DataGrid控件的DataGrid1_Click事件单击事件读取，但是必须对读取记录进行双击：
Private Sub DataGrid1_Click()
Text1(0).Text = Adodc1.Recordset.Fields(0)
Text1(1).Text = Adodc1.Recordset.Fields(1)
Text1(2).Text = Adodc1.Recordset.Fields(2)
Text1(3).Text = Adodc1.Recordset.Fields(3)
Text1(4).Text = Adodc1.Recordset.Fields(4)
End Sub
方法2：用按钮的Command1_Click单击事件读取，方法是首先点击DataGrid控件的记录，然后再点击按钮：
Private Sub Command