t3=”“ EndSub Sonra Forma(object) pəncərəsinə keçib ―Hesabla‖ prosedurunu hazırlayırıq. Yəni, cmdHes əmr düyməsi üzərində sol düyməni 2 dəfə basıb kod pəncərəsini açıb proseduru aşağıdakı kimi yazırıq:
Dim a, b, c AsSingle Private SubcmdHes_Click() a=Val(t1)
b=Val(t2) c=a-b t3=str(c) End Sub
Sonra Runvə ya F5düyməsi ilə layihəni icraya buraxırıq. Sonra ―Son‖ düyməsini basıb, işi bitiririk. Sonra Excel faylına ad verib yadda saxlayırıq. Sonra Сервис-də Защита- Параметры-Безопасность-Средняя marşrutu ilə Excelin müdafiə rejimini orta səviyyəyə endirməli. Sonra Servis-Redaktor Visual Basic- ok marşrutu ilə formanı açıb F5-lə işləmək olar. Sonra isə Сервис-də Защита-Параметры-Безопасность-Высокая marşrutu ilə Excelin müdafiə rejimini bərpa etmək lazımdır. Əgər növbəti açılışda forma görünməzsə, Alt+F11 düyməsi ilə module bəndinə keçmək və sonra Play bəndi ilə layihəni işlətmək olar. Ən yaxşısı Excel səhifəsində Forma açan düymə yaratmaqdır. Bunun üçün modulda:
SubКнопка1_Щелкнут() IEFH.Show