Определение процедуры для события Valid

Запустите форму на выполнение, введите значение кредита более 5000, перейдите на следующее поле. Откроется диалоговое окно с сообщением об ошибке (рис. 12.3).