Нужно чтобы при перемещении привязанного к Бд Datagridа становилось текстовое поле me.txtClient соответствующее значении в позиции курсора DataGrid
'-------- далаю так но :
Private Sub DataGrid1_Click()
Me.txtClient = Me.DataGrid1.Columns(1)
End Sub

но показывается предыдущая записть так как событие еще не закончилось?

Как решить эту проблему?