UserForm ile Dört İşlem Yapma

Hazır Kod​

İndirmek için giriş yapmanız gerekmektedir.
(85 satır)

Açıklama​

Aşamalar​

1. VBA Düzenleyici açılmaktadır. Ekle menüsünden Modül eklenmektedir. Hazır Kod bölümündeki Show_FourOps_Form yordamı modül penceresine yapıştırılmaktadır.
2. Ekle menüsünden UserForm eklenmektedir. Varsayılan ad UserForm1 olarak bırakılmaktadır.
3. UserForm üzerinde aşağıdaki denetimler manuel eklenmektedir. Adların birebir aynı olması gerekmektedir.

• Label denetimi. Name lblA. Caption Sayi A. Left 12, Top 14, Width 60 olmaktadır.
• TextBox denetimi. Name txtA. Left 90, Top 12, Width 90, Height 20 olmaktadır.
• Label denetimi. Name lblB. Caption Sayi B. Left 12, Top 42, Width 60 olmaktadır.
• TextBox denetimi. Name txtB. Left 90, Top 40, Width 90, Height 20 olmaktadır.
• Label denetimi. Name lblOp. Caption Islem. Left 12, Top 70, Width 60 olmaktadır.
• ComboBox denetimi. Name cboOp. Left 90, Top 68, Width 120, Height 18 olmaktadır.
• CommandButton denetimi. Name cmdCalc. Caption Hesapla. Left 12, Top 110, Width 80, Height 26 olmaktadır.
• CommandButton denetimi. Name cmdClear. Caption Temizle. Left 100, Top 110, Width 80, Height 26 olmaktadır.
• CommandButton denetimi. Name cmdClose. Caption Kapat. Left 188, Top 110, Width 80, Height 26 olmaktadır.
• Label denetimi. Name lblResult. Caption Sonuc:. Left 12, Top 150, Width 256, Height 18 olmaktadır.

Kullanım​

• Modüldeki Show_FourOps_Form yordamı çalıştırılmaktadır.
• Sayi A ve Sayi B alanlarına değer girilmektedir.
• Islem listesinden Toplama Cikarma Carpma veya Bolme seçilmektedir.
• Hesapla düğmesi ile sonuç görüntülenmektedir. Temizle ile girişler temizlenmektedir. Kapat ile form kapatılmaktadır.

Sınırlamalar ve Notlar​

• Ondalık ayracı için girdilerde virgül ve nokta desteklenmektedir. Gerekirse bölgesel ayara uygun metin dönüştürülmektedir.
• Bolme işleminde b degeri sifir ise uyarı verilmektedir.
• Denetim adları değiştirildiğinde kod içinde de aynı adların kullanılması gerekmektedir.