ник: Анатолий (Киев)
Насколько я помню, присвоение значения св-ву Text вызывает повторно событие Change и если снова меняете его, то попадаете в бесконечный цикл.
Если я прав, то странно, что у вас это работало в А2003.
Нужно либо присваивать измененное значение св-ву Value, либо проверять значение св-ва Text и ничего не делать, если оно вас устраивает.
Кстати, а что вы проверяете конструкцией If Right(Факс.Text, 1) <> " " Then? Вернее, когда там пробел, а когда нет?