一个棘手的问题！大家帮帮忙!

Question

1)     现状： 用户登录认证画面-->明细画面（登录，更新，删除）-->确认画面
2) 操作流程： 用户登录后，在明细画面填入信息，到确认画面再次确认填入信息，登录到DB. 确认画面关闭，明细画面显示，
                      再次检索后要求把刚才登录到数据库的数据行选中（明细画面上有一个DataGrid）。
3)     问题： 登录到DB的数据有一Key（EmpyloeeId="SS00162"）,现在要在明细画面上（DataGrid）里选中该Key(EmpyloeeId="SS00162"）的所在行，请问代码怎么写？        

Answer 1

Private Sub Command1_Click()
    Dim i As Integer
    For i = 0 To DataGrid1.VisibleRows - 1
        With DataGrid1
            If CStr(.Columns.Item("EmpyloeeId").CellText(.RowBook(i))) = "SS00162" Then
                .Row = i
                .SetFocus
                Exit For
            End If
        End With
    Next
End Sub