ник: час
И второй геморой
Для того что бы данные, вводимые в datagrid - сразу попадали в таблицу, по мере их ввода, придумал такую фигню
Private Sub DataGrid1_Change()
Dim str As Variant
str = NZVB(Me!DataGrid1.Text)
Me!Adodc1.Recordset.MoveNext
Me!Adodc1.Recordset.MovePrevious
Me!DataGrid1.Text = str
Me!DataGrid1.SelStart = Len(Me!DataGrid1.Text) + 1
End Sub
|
Иначе приходится вручную переходить мышкой или стрелками на другую запись - для закрепления (передачи данных в таблицу источник данных)
Может есть иной способ???