ник: Скорп
FORMAT спасибо
но пока не работает
Private Sub Поле64_Change()
DoCmd.ApplyFilter , "Название_Фирмы like '" & Me.Поле64.Text & "*'"
Me.Поле64.SelStart = Len(Me.Поле64.Text)
If Err.Number = 2185 Then
MsgBox ("Нельзя ")
End If
End Sub
|
на счет "Эврики" полностью с вами согласен
99% своей разработки на этом ощущении и было сделано :-)