İnformatikanin əsaslari



Yüklə 1,28 Mb.
səhifə61/156
tarix16.12.2023
ölçüsü1,28 Mb.
#182397
növüDərs
1   ...   57   58   59   60   61   62   63   64   ...   156
nformatikanin saslari

Private Sub cmdTem_Click()

t1=” “

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:
Sub Кнопка1_Щелкнут() IEFH.Show

Yüklə 1,28 Mb.

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




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

gir | qeydiyyatdan keç
    Ana səhifə


yükləyin