ник: osmor
раз нашли - можно и поменять, если рекордсет под формой обновляемый
например так:
rst.FindFirst "[MyField] like '" & MyTextBox.Text & "*'"
if not rst.NoMatch then
me.bookmark = rst.bookmark
me.MyField = MyTextBox.Text & right(me.MyField,len(me.MyField) - len(MyTextBox.Text))
end if
MyTextBox.SelStart = Len(MyTextBox.Text)