İsa Musayev, Mətləb Əlizadə


Private Sub cmdSon_Click()  End Sub



Yüklə 1,71 Mb.
Pdf görüntüsü
səhifə61/166
tarix15.06.2022
ölçüsü1,71 Mb.
#116950
növüDərs
1   ...   57   58   59   60   61   62   63   64   ...   166
Private Sub cmdSon_Click() 
End Sub 
yazısı çıxır. ―Son‖ düyməsinə aid prosedurun icrası üçün bu yazı end operatoru ilə 
tamamlanmalıdır. Yəni: 
Private Sub cmdSon_Click() 
end 
End Sub 
Sonra Forma(object) pəncərəsinə keçib ―Təmizlə‖ prosedurunu hazırlayırıq. Yəni, 
cmdTem ə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: 
Private Sub cmdTem_Click() 
t1=” “ 


82 
t2=” “ 
 
t3=” “ 
End Sub 
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: 
Option Explickt 
Dim a, b, c As Single 
Private Sub cmdHes_Click() 
a=Val(t1) 
b=Val(t2) 
c=a-b 
t3=str(c) 
End Sub 
Sonra Run və ya F5 dü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: 

Yüklə 1,71 Mb.

Dostları ilə paylaş:
1   ...   57   58   59   60   61   62   63   64   ...   166




Verilənlər bazası müəlliflik hüququ ilə müdafiə olunur ©muhaz.org 2024
rəhbərliyinə müraciət

gir | qeydiyyatdan keç
    Ana səhifə


yükləyin